主题:[讨论]大神们,知道下面的程序段是用什么版本编写的?
刚接触fortran不久,就了解fortran有老的固定格式和自由格式,可这下面的语法又是什么格式?求解
PROGRAM ORIGEN2
MAI 130
LOGICAL LONG
MAI 140
C DELETE THE FOLLOWING THREE CARDS IN THE CDC VERSION OF MAIN
MAI 150
INTEGER*2 LOCA,NON0,KD,LOC,NGF,NGN,NGR,NYIELD,NONP,NQ,MMAX,KAP,
MAI 160
$LOCP,NFUDFP
MAI 170
DOUBLE PRECISION CIMN,CSUM
MAI 180
DIMENSION XNEW( 13,1700),COEFF( 7,1700),NPROD( 7,1700),
MAI 190
$MMAX(1700),KAP(1700)
PROGRAM ORIGEN2
MAI 130
LOGICAL LONG
MAI 140
C DELETE THE FOLLOWING THREE CARDS IN THE CDC VERSION OF MAIN
MAI 150
INTEGER*2 LOCA,NON0,KD,LOC,NGF,NGN,NGR,NYIELD,NONP,NQ,MMAX,KAP,
MAI 160
$LOCP,NFUDFP
MAI 170
DOUBLE PRECISION CIMN,CSUM
MAI 180
DIMENSION XNEW( 13,1700),COEFF( 7,1700),NPROD( 7,1700),
MAI 190
$MMAX(1700),KAP(1700)