我试图理解“变量依赖格式”,特别是在FORTRAN格式语句中的重复计数是变量而不是固定数字的情况下。我在这里经历了类似的问题之一,这是通过定义格式变量来解决的。我尝试实现类似类型的测试代码,但是遇到运行时错误,提示“ Fortran运行时错误:缺少格式的初始左括号”。我正在附上我拥有的代码。您能否让我知道我要去哪里错了。
谢谢
program main
implicit none
integer num,i
real,dimension(:),allocatable :: logar
character(len = 100) fmt
print*, "enter any number"
read*,num
allocate(logar(num))
do i = 1,num
logar(i) = log(i/3.14)
end do
open(unit=200,file="num.txt",status="unknown")
write(fmt,'( I4,"(f10.5)" )') num
print*,fmt
write(200,fmt) (logar(i),i=1,num)
end program
更改
write(fmt,'( I4,"(f10.5)" )') num
至
write(fmt,'(a, I4,"(f10.5)",a )') '(', num, ')'
否则,您缺少中的括号fmt
。格式字符串由括号分隔。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句