我正在使用gfortran
(来自gcc-4.8.1)编译.f90
源文件,并遇到错误消息:
Error: Function 'inint' at (1) has no IMPLICIT type
我做了一些搜索,发现GNU website说[ININT
]
此内在功能尚未实施。但是,该名称是保留的 作为内在的。
在SGI documentation中,据说是
ININT将最近的INTEGER * 2返回到其REAL * 4参数。
我的问题是:
ININT
是Fortran77 / 90/95/2003的标准功能吗?
在gfortran
中,为INIT
编写替换函数的正确/符合标准的方式是什么?
答案 0 :(得分:2)
我之前从未使用过ININT
,它可能没有任何标准。相反,我建议使用NINT
(FORTRAN 77),它采用可选的KIND
参数(Fortran 90):
RESULT = NINT(A [, KIND])
(取自the GCC docs
)
选择KIND
以反映INTEGER*2
,无论您的特定编译器是什么......但是当您遇到它时,请尝试SELECTED_INT_KIND
。