fortran - Fortran90 中的变量相关格式

Question

我试图理解“变量相关格式”，特别是 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

标签： fortranfortran90

Answer 1

改变

write(fmt,'( I4,"(f10.5)" )') num

至

write(fmt,'(a, I4,"(f10.5)",a )') '(', num, ')'

否则，您缺少fmt. 格式字符串由括号分隔。