|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?注册
x
有谁知道如何将FORTRAN77中的COMMON语句转换为FORTRAN90中的模块形式?
比如下面这个,这是一个FORTRAN77文件中的INCLUDE文件:
IMPLICIT REAL*8 (A-H,O-Z)
PARAMETER (MS = 1000, MPOP = 500, NOP = 50)
C
COMMON/ISEED/IS, IF,POPS
COMMON/POP/NO(MS,MPOP), NN(MS,MPOP)
COMMON/POP1/XYO(NOP,MPOP),XYN(NOP,MPOP),FIO(MPOP),
# FIN(MPOP)
COMMON/STATS/SUMF, AVG, VMA, VMI
COMMON/IMIN/IMIN
COMMON/CO12/CO1(NOP) , CO2(NOP)
COMMON/INITDA/ NPOP, LCH, MAXG
COMMON/PCPM/PC, PM
COMMON/NBIT/NBIT(NOP), NOP
COMMON/SELE/NR(MPOP), NPI
COMMON/LEV11/EVaL
C
COMMON/TECHNIQUE/IFT,IFR,IFS,
# IFLI,IFE,IFU
COMMON/METHOD/CM, AL
COMMON/NICHE/SIG, B
COMMON/QUELMUI/IFCH
COMMON/QUEL/IFCH
非常感谢![DISABLELBCODE] |
|