我正在尝试编写一个我想要读取变量(Delta
)的代码,并基于此我尝试复制相应的文件(TESTDIR/Delta0.5_DOS_2D_TBM.data
DOS.data
for { {1}})到目前的目录。
Delta=0.5
但是,当我输入 Program Modify_variable_based_file
character(LEN=100):: command
character(LEN=10):: chDelta
real*8:: Delta
Print*,'Enter Delta'
Read*,Delta
write(chDelta,'(f0.1)') Delta
print*,'chDelta=',chDelta,' Delta=',Delta
command='cp TESTDIR/Delta' // trim(adjustl(chDelta)) //'_DOS_2D_TBM.data DOS.data'
call system(command)
End Program Modify_variable_based_file
时,我可以看到chDelta
是.5
而不是0.5
。
你能建议我正确的格式吗?还有一种方法可以避免字符串转换吗?
请注意,此处我的文件以小数点左侧最高位数的数字命名,即如果Delta
为Delta
,则文件为1.5
。只有当没有其他有效数字时,零才会出现在小数之前。