megvea.f(76): error #5082: Syntax error, found IDENTIFIER 'PARMS3' when expecting one of: <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT>
INCLUDE PARMS3.EXT ! I/O API parameters
--------------^
megvea.f(77): error #5082: Syntax error, found IDENTIFIER 'IODECL3' when expecting one of: <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT>
INCLUDE IODECL3.EXT ! I/O API function declarations
--------------^
megvea.f(78): error #5082: Syntax error, found IDENTIFIER 'FDESC3' when expecting one of: <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT>
INCLUDE FDESC3.EXT ! I/O API file desc. data structures
--------------^
megvea.f(79): error #5082: Syntax error, found IDENTIFIER 'MEGVEA' when expecting one of: <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT>
INCLUDE MEGVEA.EXT ! coefficients
--------------^
megvea.f(82): error #6236: A specification statement cannot appear in the executable section.
INTEGER, EXTERNAL :: ENVINT
------^
megvea.f(84): error #6236: A specification statement cannot appear in the executable section.
INTEGER, EXTERNAL :: ENVYN
------^
megvea.f(85): error #6236: A specification statement cannot appear in the executable section.
LOGICAL DSCGRID
------^
megvea.f(86): error #6236: A specification statement cannot appear in the executable section.
EXTERNAL DSCGRID
------^
megvea.f(90): error #6236: A specification statement cannot appear in the executable section.
CHARACTER*16 :: PROGNAME = 'MEGVEA'
------^
megvea.f(92): error #6236: A specification statement cannot appear in the executable section.
CHARACTER*16 :: LAIS46 = 'LAIS46' ! LAI file logical name
------^
megvea.f(93): error #6236: A specification statement cannot appear in the executable section.
CHARACTER*16 :: AQFILE = 'AQFILE' ! Air quality index file
------^
megvea.f(94): error #6236: A specification statement cannot appear in the execut[Fortran] 纯文本查看 复制代码 megvea.f(76): error #5082: Syntax error, found IDENTIFIER 'PARMS3' when expecting one of: <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT>
INCLUDE PARMS3.EXT ! I/O API parameters
--------------^
megvea.f(77): error #5082: Syntax error, found IDENTIFIER 'IODECL3' when expecting one of: <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT>
INCLUDE IODECL3.EXT ! I/O API function declarations
--------------^
megvea.f(78): error #5082: Syntax error, found IDENTIFIER 'FDESC3' when expecting one of: <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT>
INCLUDE FDESC3.EXT ! I/O API file desc. data structures
--------------^
megvea.f(79): error #5082: Syntax error, found IDENTIFIER 'MEGVEA' when expecting one of: <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT>
INCLUDE MEGVEA.EXT ! coefficients
--------------^
megvea.f(82): error #6236: A specification statement cannot appear in the executable section.
INTEGER, EXTERNAL :: ENVINT
------^
megvea.f(84): error #6236: A specification statement cannot appear in the executable section.
INTEGER, EXTERNAL :: ENVYN
------^
megvea.f(85): error #6236: A specification statement cannot appear in the executable section.
LOGICAL DSCGRID
------^
megvea.f(86): error #6236: A specification statement cannot appear in the executable section.
EXTERNAL DSCGRID
------^
megvea.f(90): error #6236: A specification statement cannot appear in the executable section.
CHARACTER*16 :: PROGNAME = 'MEGVEA'
------^
megvea.f(92): error #6236: A specification statement cannot appear in the executable section.
CHARACTER*16 :: LAIS46 = 'LAIS46' ! LAI file logical name
------^
megvea.f(93): error #6236: A specification statement cannot appear in the executable section.
CHARACTER*16 :: AQFILE = 'AQFILE' ! Air quality index file
------^
megvea.f(94): error #6236: A specification statement cannot appear in the execut |