Fortran标准函数库

附录 FORTRAN 90 标准函数 符号约定：  I 代表整型;R 代表实型;C 代表复型;CH 代表字符型;S 代表字符串;L 代表逻辑型;A 代表数组;P 代表指针;T 代表派生类型;AT 为任意类型。  s:P 表示s 类型为P 类型(任意kind 值)。s:P(k)表示s 类型为P 类型(kind值=k)。  […]表示可选参数。  *表示常用函数。 表1 数值和类型转换函数 函数名 说明 ABS(x)* 求 x 的绝对值∣x∣。x:I、R, 结果类型同 x; x:C, 结果:R AIMAG(x) 求 x 的实部。x:C, 结果:R AINT(x[,kind])* 对 x 取整,并转换为实数(kind)。x:R, kind:I, 结果:R(kind) AMAX0(x1,x2,x3,…)* 求 x1,x2,x3,…中最大值。xI:I, 结果:R AMIN0(x1,x2,x3,…)* 求 x1,x2,x3,…中最小值。xI:I, 结果:R ANINT(x[,kind])* 对 x 四舍五入取整,并转换为实数(kind)。x:R, kind:I, 结果:R(kind) CEILING(x)* 求大于等于 x 的最小整数。x:R, 结果:I CMPLX(x[,y][,kind])) 将参数转换为x、(x,0.0)或(x,y)。x:I、R、C, y:I、R,kind:I, 结果:C(kind) CONJG(x) 求 x 的共轭复数。x:C, 结果:C DBLE(x)* 将 x 转换为双精度实数。x:I、R、C, 结果:R(8) DCMPLX(x[,y]) 将参数转换为x、(x,0.0)或(x,y)。x:I、R、C, y:I、R, 结果:C(8) DFLOAT(x) 将 x 转换为双精度实数。x:I, 结果:R(8) DIM(x,y)* 求x-y 和0 中最大值, 即MAX(x-y,0)。x:I、R, y 的类型同x,结果类型同xDPROD(x,y) 求x 和y 的乘积,并转换为双精度实数。x:R, y:R, 结果:R(8) FLOAT(x)* 将x 转换为单精度实数。x:I, 结果:R FLOOR(x)* 求小于等于x 的最大整数。x:R, 结果:I IFIX(x)* 将x 转换为整数(取整)。x:R, 结果:I IMAG(x) 同AIMAG(x) INT(x[,kind])* 将x 转换为整数(取整)。x:I、R、C, kind:I, 结果:I(kind) LOGICAL(x[,kind])* 按kind 值转换新逻辑值。x:L, 结果:L(kind) MAX(x1,x2,x3,…)* 求x1,x2,x3,…中最大值。xI为任意类型, 结果类型同xI MAX1(x1,x2,x3,…)* 求x1,x2,x3,…中最大值(取整)。xI:R, 结果:I MIN(x1,x2,x3,…)* 求x1,x2,x3,…中最小值。xI为任意类型, 结果类型同xI MIN1(x1,x2,x3,…)* 求x1,x2,x3…中最小值(取整)。xI:R, 结果:I MOD(x,y)* 求x/y 的余数,值为x-INT(x/y)*y。x:I、R, y 的类型同x, 结果类型同x MODULO(x,y) 求x/y 余数,值为x-FLOOR(x/y)*y。x:I、R, y 的类型...