fortran77定义parameter出错,不知道怎么修改?

芥子纳须弥

[Fortran] 纯文本查看 复制代码

      program test
      implicit real*8 (a-h,o-z)
 
      include 'params_def.f'
      write(*,*)"indmax:",indmax
     
      end program test

params_def.f 代码如下:

[Fortran] 纯文本查看 复制代码

      parameter (indmax=200,nchrmax=60,nparmax=4)
c  indmax  = maximum # of individuals, i.e. max population size
c  nchrmax = maximum # of chromosomes (binary bits) per individual
c  nparmax = maximum # of parameters which the chromosomes make up

我在ubuntu运行后报错:
params_def.f:1:48:

c  nparmax = maximum # of parameters which the chromosomes make up
                                                1
Error: Unexpected characters in PARAMETER statement at (1)
params_def.f:1:48:

c  nparmax = maximum # of parameters which the chromosomes make up
                                                1
Error: Unexpected characters in PARAMETER statement at (1)

芥子纳须弥

是的。我后来统一了扩展名 .f 就解决了。

青衣巷

自由格式源代码只能 include 自由格式的包含文件。
固定格式源代码只能 include 固定格式的包含文件。

注意源代码的扩展名，以便让编译器清晰的知道此文件是自由格式还是固定格式。