我在程序开始定义变量,用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
到底问题在哪,求高手解答,谢谢 可追分
第1个回答 2012-03-19
eps可能名字跟系统函数重了吧
module名字不能以数字开头
最后的end应该改成end module本回答被提问者采纳
module名字不能以数字开头
最后的end应该改成end module本回答被提问者采纳