有关一个FORTRAN 的问题,我是新手
我在程序开始定义变量,用MODULE,如下(我只贴出有问题的地方):MODULE123REAL(KIND=8),PARAMETER::EPS=0.0001REAL(KIN...
我在程序开始定义变量,用MODULE,如下(我只贴出有问题的地方):
MODULE 123
REAL(KIND=8),PARAMETER::EPS=0.0001
REAL(KIND=8),PARAMETER::BR=1
END
错误如下:
F:\FORTRANlianxi\NEWROUGHNESS\NEWROUGHNESS123.F90(52) : Error: This PARAMETER constant name is invalid in this context. [EPS]
EPS=0.001
--------^
F:\FORTRANlianxi\NEWROUGHNESS\NEWROUGHNESS123.F90(99) : Error: This PARAMETER constant name is invalid in this context. [P]
P=PE
--------^
F:\FORTRANlianxi\NEWROUGHNESS\NEWROUGHNESS123.F90(170) : Error: This PARAMETER constant name is invalid in this context. [BR]
BR=((D0/2)**2+K**2)/2/K
到底问题在哪,求高手解答,谢谢 可追分 展开
MODULE 123
REAL(KIND=8),PARAMETER::EPS=0.0001
REAL(KIND=8),PARAMETER::BR=1
END
错误如下:
F:\FORTRANlianxi\NEWROUGHNESS\NEWROUGHNESS123.F90(52) : Error: This PARAMETER constant name is invalid in this context. [EPS]
EPS=0.001
--------^
F:\FORTRANlianxi\NEWROUGHNESS\NEWROUGHNESS123.F90(99) : Error: This PARAMETER constant name is invalid in this context. [P]
P=PE
--------^
F:\FORTRANlianxi\NEWROUGHNESS\NEWROUGHNESS123.F90(170) : Error: This PARAMETER constant name is invalid in this context. [BR]
BR=((D0/2)**2+K**2)/2/K
到底问题在哪,求高手解答,谢谢 可追分 展开
若以下回答无法解决问题,邀请你更新回答
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询