Fortran Coder

查看: 1006|回复: 1
打印 上一主题 下一主题

[求助] Fortran编译程序时出现报错#5082、#6236

[复制链接]

1

帖子

1

主题

0

精华

新人

F 币
10 元
贡献
3 点
跳转到指定楼层
楼主
发表于 2024-4-4 14:30:34 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
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
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

167

帖子

2

主题

1

精华

大师

Vim

F 币
1012 元
贡献
484 点

规矩勋章

沙发
发表于 2024-4-4 15:10:05 | 只看该作者
include后面跟着的是字符串,需要加引号
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-11-23 17:24

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表