第 2 章 Fortran 95 内函数

2.1 标准 Fortran 95 的通用内函数

所示参数是在采用关键字形式时可以用作参数关键字的名称，如 cmplx(Y=B, KIND=M, X=A) 中所示。

有关这些通用内过程的详细说明，请查阅 Fortran 95 标准。

2.1.1 参数存在查询函数

标有 # 号的函数不能用作实际参数。“双精度”表示双精度实数。

2.2 Fortran 2003 Module Routines

Fortran 2003 标准提供了一组内模块，它们定义了支持 IEEE 算术以及与 C 语言的互操作性所需的功能。

2.2.1 IEEE 算术和异常模块

Fortran 2003 标准内模块 IEEE_EXCEPTIONS 、 IEEE_ARITHMETIC 和 IEEE_FEATURES 支持采用建议的语言标准的新功能，从而支持 IEEE 算术和 IEEE 异常处理。

草案标准定义了一组查询函数、基本函数、种类函数、基本子例程和非基本子例程。后面的表中列出了这些函数和子例程。

要访问这些函数和子例程，调用例程必须包括

USE, INTRINSIC :: IEEE_ARITHMETIC, IEEE_EXCEPTIONS

有关详细信息，请参见 Fortran 标准 ( http://www.j3-fortran.org )。

2.2.1.1 查询函数

模块 IEEE_EXCEPTIONS 包含下列查询函数。

2.2.2 C 绑定模块

Fortran 2003 标准提供了一种引用 C 语言过程的方式。 ISO_C_BINDING 模块按内模块函数形式定义了三个支持过程。访问这些函数需要在调用例程中使用

USE, INTRINSIC :: ISO_C_BINDING, ONLY: C_LOC, C_PTR, C_ASSOCIATED

。该模块中定义的过程如下

2.3 非标准 Fortran 95 内函数

2.3.1 基本线性代数函数 (BLAS)

2.3.3 其他供应商的内函数

2.3.4.2 内存函数