gfortran错误:功能' inint' at(1)没有IMPLICIT类型

时间:2014-10-05 09:25:46

标签: fortran gfortran

我正在使用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编写替换函数的正确/符合标准的方式是什么?

1 个答案:

答案 0 :(得分:2)

我之前从未使用过ININT,它可能没有任何标准。相反,我建议使用NINT(FORTRAN 77),它采用可选的KIND参数(Fortran 90):

RESULT = NINT(A [, KIND]) 

(取自the GCC docs

选择KIND以反映INTEGER*2,无论您的特定编译器是什么......但是当您遇到它时,请尝试SELECTED_INT_KIND