- 积分
- 2519
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2023-6-23
- 最后登录
- 1970-1-1
|
发表于 2024-4-3 15:23:01
|
显示全部楼层
楼主好,我的MEGAN卡在了./make_all_programs.scr编译上,有很多的error,我在*.64bit文件中加了-qopenmp,但是还是会有报错,目前具体报错内容如下:- megvea.f(76): error #5102: Cannot open include file 'PARMS3.EXT'
- INCLUDE 'PARMS3.EXT' ! I/O API parameters
- --------------^
- megvea.f(77): error #5102: Cannot open include file 'IODECL3.EXT'
- INCLUDE 'IODECL3.EXT' ! I/O API function declarations
- --------------^
- megvea.f(78): error #5102: Cannot open include file 'FDESC3.EXT'
- INCLUDE 'FDESC3.EXT' ! I/O API file desc. data structures
- --------------^
- megvea.f(204): error #6404: This name does not have a type, and must have an explicit type. [INIT3]
- LOGDEV = INIT3()
- ---------------^
- megvea.f(252): error #6404: This name does not have a type, and must have an explicit type. [GDTYP3D]
- IF( .NOT. DSCGRID( GDNAM, CNAME, GDTYP3D,
- ---------------------------------------^
- megvea.f(253): error #6404: This name does not have a type, and must have an explicit type. [P_ALP3D]
- & P_ALP3D, P_BET3D, P_GAM3D, XCENT3D, YCENT3D,
- --------------------^
- megvea.f(253): error #6404: This name does not have a type, and must have an explicit type. [P_BET3D]
- & P_ALP3D, P_BET3D, P_GAM3D, XCENT3D, YCENT3D,
- -----------------------------^
- megvea.f(253): error #6404: This name does not have a type, and must have an explicit type. [P_GAM3D]
- & P_ALP3D, P_BET3D, P_GAM3D, XCENT3D, YCENT3D,
- --------------------------------------^
- megvea.f(253): error #6404: This name does not have a type, and must have an explicit type. [XCENT3D]
- & P_ALP3D, P_BET3D, P_GAM3D, XCENT3D, YCENT3D,
- -----------------------------------------------^
- megvea.f(253): error #6404: This name does not have a type, and must have an explicit type. [YCENT3D]
- & P_ALP3D, P_BET3D, P_GAM3D, XCENT3D, YCENT3D,
- --------------------------------------------------------^
- megvea.f(254): error #6404: This name does not have a type, and must have an explicit type. [XORIG3D]
- & XORIG3D, YORIG3D, XCELL3D, YCELL3D,
- --------------------^
- megvea.f(254): error #6404: This name does not have a type, and must have an explicit type. [YORIG3D]
- & XORIG3D, YORIG3D, XCELL3D, YCELL3D,
- -----------------------------^
- megvea.f(254): error #6404: This name does not have a type, and must have an explicit type. [XCELL3D]
- & XORIG3D, YORIG3D, XCELL3D, YCELL3D,
- --------------------------------------^
- megvea.f(254): error #6404: This name does not have a type, and must have an explicit type. [YCELL3D]
- & XORIG3D, YORIG3D, XCELL3D, YCELL3D,
- -----------------------------------------------^
- megvea.f(255): error #6404: This name does not have a type, and must have an explicit type. [NCOLS3D]
- & NCOLS3D, NROWS3D, NTHIK3D ) ) THEN
- --------------------^
- megvea.f(255): error #6404: This name does not have a type, and must have an explicit type. [NROWS3D]
- & NCOLS3D, NROWS3D, NTHIK3D ) ) THEN
- -----------------------------^
- megvea.f(255): error #6404: This name does not have a type, and must have an explicit type. [NTHIK3D]
- & NCOLS3D, NROWS3D, NTHIK3D ) ) THEN
- --------------------------------------^
- megvea.f(265): error #6404: This name does not have a type, and must have an explicit type. [OPEN3]
- IF ( .NOT. OPEN3( LAIS46, FSREAD3, PROGNAME ) ) THEN
- -----------------^
- megvea.f(271): error #6404: This name does not have a type, and must have an explicit type. [FILCHK3]
- IF ( .NOT. FILCHK3 ( LAIS46,
- -----------------^
- megvea.f(276): error #6404: This name does not have a type, and must have an explicit type. [DESC3]
- IF ( .NOT. DESC3( LAIS46 ) ) THEN
- -----------------^
- megvea.f(281): error #6404: This name does not have a type, and must have an explicit type. [MXREC3D]
- MXLAI = MXREC3D
- --------------^
- megvea.f(389): error #6404: This name does not have a type, and must have an explicit type. [TSTEP3D]
- TSTEP = TSTEP3D
- --------------^
- megvea.f(403): error #6404: This name does not have a type, and must have an explicit type. [CHECK3]
- IF ( .NOT. CHECK3( CANMET, 'SunleafTK', IDATE, ITIME ) ) THEN
- -----------------^
- megvea.f(415): error #6404: This name does not have a type, and must have an explicit type. [SDATE3D]
- SDATE3D = SDATE ! From run-script
- ------^
- megvea.f(416): error #6404: This name does not have a type, and must have an explicit type. [STIME3D]
- STIME3D = STIME ! From run-script
- ------^
- megvea.f(419): error #6404: This name does not have a type, and must have an explicit type. [NLAYS3D]
- NLAYS3D = 1
- ------^
- megvea.f(420): error #6404: This name does not have a type, and must have an explicit type. [NVARS3D]
- NVARS3D = 20
- ------^
- megvea.f(423): error #6410: This name has not been declared as an array or a function. [VNAME3D]
- VNAME3D(S) = TRIM( MGN_SPC( S ) )
- ---------^
- megvea.f(423): error #6303: The assignment operation or the binary expression operation is invalid for the data types of the two operands. [TRIM]
- VNAME3D(S) = TRIM( MGN_SPC( S ) )
- ----------------------^
- megvea.f(424): error #6410: This name has not been declared as an array or a function. [VDESC3D]
- VDESC3D(s) = 'Environmental activity factor for '//
- ---------^
- megvea.f(1094): catastrophic error: Too many errors, exiting
- compilation aborted for megvea.f (code 1)
- make: *** [megvea.o] 错误 1
复制代码 |
|