紧急求助，固定格式与自由格式的问题
分别采用NVT和NPT模拟出当T*=1.65时，LJ流体的状态方程并进行比较用FORTRAN编写的时候总是有错误，恳请高手指教，非常感谢。
请给出源码，错误提示 楚香饭 发表于 2014-10-9 15:30
请给出源码，错误提示
谢谢您，代码说是超过1000字，回复不了。错误是：
--------------------Configuration: rty - Win32 Debug--------------------
Compiling Fortran...
F:\fortran programs\rty\agsdf.for
f90: Error: Illegal character in statement label field
f90: Error: Illegal character in statement label field
f90: Error: Illegal character in statement label field
f90: Error: Illegal character in statement label field
f90: Error: Illegal character in statement label field
f90: Error: First statement in file must not be continued
F:\fortran programs\rty\agsdf.for(1) : Error: Syntax error, found END-OF-STATEMENT when expecting one of: ( : % . = =>
PROGRAM MCNVT
-------------^
F:\fortran programs\rty\agsdf.for(357) : Error: Illegal character in statement label field[=]
= '',F10.6)') FLP
---^
F:\fortran programs\rty\agsdf.for(357) : Error: Syntax error, found REAL_CONSTANT '.6' when expecting one of: ( * , ) + . - % . ** / // =
= '',F10.6)') FLP
-----------^
F:\fortran programs\rty\agsdf.for(84) : Error: Executable statements are invalid within the BLOCK DATA unit.
WRITE(*,'(1H1,'' **** PROGRAM MCLJ **** ''/)')
--------^
F:\fortran programs\rty\agsdf.for(76) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
CHARACTER TITLE*80, CNFILE*30
--------------------^
F:\fortran programs\rty\agsdf.for(67) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL DRMAX, DENS, TEMP, DENSLJ, SIGMA, RMIN, RCUT, BETA
--------------------^
F:\fortran programs\rty\agsdf.for(67) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL DRMAX, DENS, TEMP, DENSLJ, SIGMA, RMIN, RCUT, BETA
---------------------------^
F:\fortran programs\rty\agsdf.for(67) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL DRMAX, DENS, TEMP, DENSLJ, SIGMA, RMIN, RCUT, BETA
---------------------------------^
F:\fortran programs\rty\agsdf.for(67) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL DRMAX, DENS, TEMP, DENSLJ, SIGMA, RMIN, RCUT, BETA
---------------------------------------^
F:\fortran programs\rty\agsdf.for(67) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL DRMAX, DENS, TEMP, DENSLJ, SIGMA, RMIN, RCUT, BETA
-----------------------------------------------^
F:\fortran programs\rty\agsdf.for(67) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL DRMAX, DENS, TEMP, DENSLJ, SIGMA, RMIN, RCUT, BETA
------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(67) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL DRMAX, DENS, TEMP, DENSLJ, SIGMA, RMIN, RCUT, BETA
------------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(67) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL DRMAX, DENS, TEMP, DENSLJ, SIGMA, RMIN, RCUT, BETA
------------------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(68) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RANF, DUMMY, ACM, ACATMA, PI, RATIO, SR9, SR3
--------------------------^
F:\fortran programs\rty\agsdf.for(68) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RANF, DUMMY, ACM, ACATMA, PI, RATIO, SR9, SR3
---------------------------------^
F:\fortran programs\rty\agsdf.for(68) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RANF, DUMMY, ACM, ACATMA, PI, RATIO, SR9, SR3
--------------------------------------^
F:\fortran programs\rty\agsdf.for(68) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RANF, DUMMY, ACM, ACATMA, PI, RATIO, SR9, SR3
--------------------------------------------------^
F:\fortran programs\rty\agsdf.for(68) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RANF, DUMMY, ACM, ACATMA, PI, RATIO, SR9, SR3
---------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(68) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RANF, DUMMY, ACM, ACATMA, PI, RATIO, SR9, SR3
--------------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(69) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL V, VNEW, VOLD, VEND, VN, DELTV, DELTVB, VS
--------------------^
F:\fortran programs\rty\agsdf.for(69) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL V, VNEW, VOLD, VEND, VN, DELTV, DELTVB, VS
-----------------------^
F:\fortran programs\rty\agsdf.for(69) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL V, VNEW, VOLD, VEND, VN, DELTV, DELTVB, VS
-----------------------------^
F:\fortran programs\rty\agsdf.for(69) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL V, VNEW, VOLD, VEND, VN, DELTV, DELTVB, VS
-----------------------------------^
F:\fortran programs\rty\agsdf.for(69) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL V, VNEW, VOLD, VEND, VN, DELTV, DELTVB, VS
-----------------------------------------^
F:\fortran programs\rty\agsdf.for(69) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL V, VNEW, VOLD, VEND, VN, DELTV, DELTVB, VS
---------------------------------------------^
F:\fortran programs\rty\agsdf.for(69) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL V, VNEW, VOLD, VEND, VN, DELTV, DELTVB, VS
----------------------------------------------------^
F:\fortran programs\rty\agsdf.for(69) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL V, VNEW, VOLD, VEND, VN, DELTV, DELTVB, VS
------------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(70) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL W, WEND, WNEW, WOLD, PRES, DELTW, WS, PS
--------------------^
F:\fortran programs\rty\agsdf.for(70) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL W, WEND, WNEW, WOLD, PRES, DELTW, WS, PS
-----------------------^
F:\fortran programs\rty\agsdf.for(70) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL W, WEND, WNEW, WOLD, PRES, DELTW, WS, PS
-----------------------------^
F:\fortran programs\rty\agsdf.for(70) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL W, WEND, WNEW, WOLD, PRES, DELTW, WS, PS
-----------------------------------^
楚香饭 发表于 2014-10-9 15:30
请给出源码，错误提示
F:\fortran programs\rty\agsdf.for(70) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL W, WEND, WNEW, WOLD, PRES, DELTW, WS, PS
-----------------------------------------^
F:\fortran programs\rty\agsdf.for(70) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL W, WEND, WNEW, WOLD, PRES, DELTW, WS, PS
-----------------------------------------------^
F:\fortran programs\rty\agsdf.for(70) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL W, WEND, WNEW, WOLD, PRES, DELTW, WS, PS
------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(70) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL W, WEND, WNEW, WOLD, PRES, DELTW, WS, PS
----------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(71) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL VLRC, VLRC6, VLRC12, WLRC, WLRC6, WLRC12
--------------------^
F:\fortran programs\rty\agsdf.for(71) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL VLRC, VLRC6, VLRC12, WLRC, WLRC6, WLRC12
--------------------------^
F:\fortran programs\rty\agsdf.for(71) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL VLRC, VLRC6, VLRC12, WLRC, WLRC6, WLRC12
---------------------------------^
F:\fortran programs\rty\agsdf.for(71) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL VLRC, VLRC6, VLRC12, WLRC, WLRC6, WLRC12
-----------------------------------------^
F:\fortran programs\rty\agsdf.for(71) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL VLRC, VLRC6, VLRC12, WLRC, WLRC6, WLRC12
-----------------------------------------------^
F:\fortran programs\rty\agsdf.for(71) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL VLRC, VLRC6, VLRC12, WLRC, WLRC6, WLRC12
------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(72) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RXIOLD, RYIOLD, RZIOLD, RXINEW, RYINEW, RZINEW
--------------------^
F:\fortran programs\rty\agsdf.for(72) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RXIOLD, RYIOLD, RZIOLD, RXINEW, RYINEW, RZINEW
----------------------------^
F:\fortran programs\rty\agsdf.for(72) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RXIOLD, RYIOLD, RZIOLD, RXINEW, RYINEW, RZINEW
------------------------------------^
F:\fortran programs\rty\agsdf.for(72) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RXIOLD, RYIOLD, RZIOLD, RXINEW, RYINEW, RZINEW
--------------------------------------------^
F:\fortran programs\rty\agsdf.for(72) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RXIOLD, RYIOLD, RZIOLD, RXINEW, RYINEW, RZINEW
----------------------------------------------------^
F:\fortran programs\rty\agsdf.for(72) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL RXIOLD, RYIOLD, RZIOLD, RXINEW, RYINEW, RZINEW
------------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(73) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL AVV, AVP, AVW, ACV, ACP, ACVSQ, ACPSQ, FLV, FLP
--------------------^
F:\fortran programs\rty\agsdf.for(73) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL AVV, AVP, AVW, ACV, ACP, ACVSQ, ACPSQ, FLV, FLP
-------------------------^
F:\fortran programs\rty\agsdf.for(73) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL AVV, AVP, AVW, ACV, ACP, ACVSQ, ACPSQ, FLV, FLP
------------------------------^
F:\fortran programs\rty\agsdf.for(73) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL AVV, AVP, AVW, ACV, ACP, ACVSQ, ACPSQ, FLV, FLP
-----------------------------------^
F:\fortran programs\rty\agsdf.for(73) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL AVV, AVP, AVW, ACV, ACP, ACVSQ, ACPSQ, FLV, FLP
----------------------------------------^
F:\fortran programs\rty\agsdf.for(73) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL AVV, AVP, AVW, ACV, ACP, ACVSQ, ACPSQ, FLV, FLP
---------------------------------------------^
F:\fortran programs\rty\agsdf.for(73) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL AVV, AVP, AVW, ACV, ACP, ACVSQ, ACPSQ, FLV, FLP
----------------------------------------------------^
F:\fortran programs\rty\agsdf.for(73) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL AVV, AVP, AVW, ACV, ACP, ACVSQ, ACPSQ, FLV, FLP
-----------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(73) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
REAL AVV, AVP, AVW, ACV, ACP, ACVSQ, ACPSQ, FLV, FLP
----------------------------------------------------------------^
F:\fortran programs\rty\agsdf.for(74) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
INTEGER STEP, I, NSTEP, IPRINT, ISAVE, IRATIO
--------------------^
F:\fortran programs\rty\agsdf.for(74) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
INTEGER STEP, I, NSTEP, IPRINT, ISAVE, IRATIO
--------------------------^
F:\fortran programs\rty\agsdf.for(74) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
INTEGER STEP, I, NSTEP, IPRINT, ISAVE, IRATIO
-----------------------------^
F:\fortran programs\rty\agsdf.for(74) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
INTEGER STEP, I, NSTEP, IPRINT, ISAVE, IRATIO
------------------------------------^
F:\fortran programs\rty\agsdf.for(74) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
INTEGER STEP, I, NSTEP, IPRINT, ISAVE, IRATIO
--------------------------------------------^
F:\fortran programs\rty\agsdf.for(74) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
INTEGER STEP, I, NSTEP, IPRINT, ISAVE, IRATIO
---------------------------------------------------^
F:\fortran programs\rty\agsdf.for(75) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
LOGICAL OVRLAP
--------------------^
F:\fortran programs\rty\agsdf.for(76) : Info: Symbol in BLOCK DATA program unit is not in a COMMON block.
CHARACTER TITLE*80, CNFILE*30
------------------------------^
Error executing df.exe.
rty.exe - 10 error(s), 0 warning(s) 看起来你的源代码是自由格式的。而你使用了固定格式的扩展名 （for）试试改成 f90 扩展名。
如果还有问题，你可以上传源代码作为附件。 fcode 发表于 2014-10-9 16:27
看起来你的源代码是自由格式的。而你使用了固定格式的扩展名 （for）试试改成 f90 扩展名。
如果还有问题 ...
请问f90的拓展名是什么？我们研一新开分子模拟课，不太明白。 你现在的文件名是 agsdf.for，改成 agsdf.f90 然后重新编译 fcode 发表于 2014-10-9 16:39
你现在的文件名是 agsdf.for，改成 agsdf.f90 然后重新编译
非常感谢。我输入了一个特别简单的程序，都有错误。代码：
PROGRAM mc
do icyc1=1,ncycl
call mcmove
if (mod(icyc1,nsamp).eq.0)
+call sample
enddo
end
错误信息：--------------------Configuration: hai - Win32 Debug--------------------
Compiling Fortran...
F:\fortran programs\hai\ad.f90
F:\fortran programs\hai\ad.f90(6) : Error: Syntax error, found END-OF-STATEMENT when expecting one of: BLOCK BLOCKDATA PROGRAM TYPE COMPLEX BYTE CHARACTER DOUBLE DOUBLECOMPLEX ...
if (mod(icyc1,nsamp).eq.0)
------------------------------------^
F:\fortran programs\hai\ad.f90(7) : Error: Syntax error, found '+' when expecting one of: <LABEL> <END-OF-STATEMENT> ; BLOCK BLOCKDATA PROGRAM TYPE COMPLEX BYTE CHARACTER ...
+call sample
--------^
Error executing df.exe.
hai.exe - 2 error(s), 0 warning(s)
PROGRAM mc
do icyc1=1,ncycl
call mcmove
if (mod(icyc1,nsamp).eq.0) call sample!// 写成一行既可
enddo
end 楚香饭 发表于 2014-10-9 17:58
PROGRAM mc
do icyc1=1,ncycl
call mcmove
请问这个是什么意思呢：--------------------Configuration: hahaha - Win32 Debug--------------------
Compiling Fortran...
F:\fortran programs\hahaha\haah.f90
F:\fortran programs\hahaha\haah.f90(2) : Warning: Variable NCYCL is used before its value has been defined
do icyc1=1,ncycl
------------------^
F:\fortran programs\hahaha\haah.f90(4) : Warning: Variable NSAMP is used before its value has been defined
if (mod(icyc1,nsamp).eq.0) call sample
-------------------------^
Linking...
haah.obj : error LNK2001: unresolved external symbol _MCMOVE@0
haah.obj : error LNK2001: unresolved external symbol _SAMPLE@0
Debug/hahaha.exe : fatal error LNK1120: 2 unresolved externals
Error executing link.exe.
hahaha.exe - 3 error(s), 2 warning(s)
页:
[1]
2