-
附录
FORTRAN
90
标准函数
符号约定：
?
I
代表整
型
;R
代表实型
;C
< br>代表复型
;CH
代表字符型
;S
代表字符串
;L
代表逻辑型
;A
代
表数组
;P
代表指针
;T
代表派生类型
< br>;AT
为任意类型。
?
s:P
表
示
s
类型为
P
类型
(
任意
kind
< br>值
)
。
s:P(k)
表示
s
类型为
P
类型
(kind
值
=k
)
。
?
[?]表示可选参数。
?
*
表示常用函数。
表
1
数值和类型转换函数
函数名
说明
求
x
的绝对值∣x∣。
x:I
、
R,
结果类型同
x;
x:C,
结果
:R
< br>求
x
的虚部。
x:C,
结果
:R
对
x
取整
,
并转换为实数
(kind)
。
x:R,
kind:I,
结果
:R(kind)
求
x
1
,x<
/p>
2
,x
3
,?中
最大值。
x
I
:I,
< br>结果
:R
求
< br>x
1
,x
2
,x
3
,?中最小值。
x
I
:I,
结果
:R
对
x
四舍五入取
整
,
并转换为实数
(kind)
。
x:R,
kind:I,
结果
:R(kind)
求大于等于
x
的最小整数。
x:R,
结果
:I
将参数转换为
x
、
(x,0.0)
或
(x,y)
。
x:I
、
R
、
C,
y:I
、
R,
kind:I,
结果
:C(kind)
求
x
的共轭复数。
x:C,
结果
:C
将
x
转换为双精度实数。
x
:I
、
R
、
C
,
结果
:R(8)
< br>将参数转换为
x
、
(x,0.0
)
或
(x,y)
。
x:I
、
R
、
C, y:I
、
R,
结果
:C(8)
将
x
转换为双精度实数。
x:I,
结果
:R(8)
求
x-y
和
0
中最大值
,
即
MAX(x-y,0)
。
x:I
、
R, y
的类
型同
x,
结果类型同
x
求
x
和
y
的乘积
,
并转换为双精度实数。
x:R,
y:R,
结果
:R(8)
ABS(x)*
AIMAG(x)
AINT(x[,kind])*
A
MAX0(x
1
,x
2
,x
3
,?)*
AMIN0(x
1
,x
2
,x
3
,?)*
ANINT(x[,kind])*
CEILING(x)*
CMPLX(x[,y][,kind]))
CONJG(x)
DBLE(x)*
DCMPLX(x[,y])
DFLOAT(x)
DIM(x,y)*
DPROD(x,y)
FLOAT(x)*
FLOOR(x)*
IFIX(x)*
IMAG(x)
INT(x[,kind])*
LOGICAL(x[,kind])*
MAX(x
1
,x
2
,x
3
,?)*
MAX1(x
1
,x
2
,x
3
,?)*
MIN(x
1
,x
2
,x
3
,?)*
MIN1(x
1
,x<
/p>
2
,x
3
,?)
*
MOD(x,y)*
MODULO(x,y)
NINT(x[,kind])*
REAL(x[,kind])*
SIGN(x,y)*
SNGL(x)
ZEXT(x)
将
< br>x
转换为单精度实数。
x:I,
结果
:R
求小于等于
x
的最大整数。
x:R,
结果
:I
将
x<
/p>
转换为整数
(
取整
)
。
x:R,
结果
< br>:I
同
AIMAG(x)
将
x
转换为整数
(
取整
)
。
x:I
、
R
、
C,
kind:I,
结果
:I(kind)
按
kind
值转换新逻辑值。
x:L,
结果
:L(kind)
求
x
1
,x
2
,x
3
,?中最大值。
x
I
为任意类型<
/p>
,
结果类型同
x
I
求
x
1<
/p>
,x
2
,x
3<
/p>
,?中最大值
(
取整
)
。
x
I
:R,
结果
:I
求
x
1
,x
2
,x
3
,?中最小值。
x
I
为任意类型
,
结果类型同
x
I
<
/p>
求
x
1
,x
2
,x
3
?中最小
值
(
取整
)
。
x
I
:R,
结
果
:I
求
x
/y
的余数
,
值为
x-INT(x/y)*y
。
x:I
、
R, y
的类型同
x,
结果类型同
x
求
x/y
余数
,
值为<
/p>
x-FLOOR(x/y)*y
。
x:I
、
R, y
的类型同
< br>x,
结果类型同
x
将
x
转换为整数
(
四舍五入
)
。
x:R
,
kind:I,
结果
:I(kind)
将
x
转换为实数。
x:I
、
R
、
C, kind:I,
结果
:R(kind)
求
x
的绝对值乘以
y
的符号。
x:I
、
R, y
的类型同
x,
结果
类型同
x
将双精度实数转换为单精度
实数。
x:R(8),
结果
:R
用
0
向左侧扩展<
/p>
x
。
x:I
、<
/p>
L,
结果
:I
表
2
三角函数
函数名
ACOS(x)*
ACOSD(x)*
ASIN(x)*
说明
求
x<
/p>
的反余弦
arccos(x)
。
x:R,
结果类型同
x,
结果值域
:0
~π
求
x
的反余弦
arccos(
x)
。
x:R,
结果类型同
x,
结果值域
:0
~18
0
°
求
x<
/p>
的反正弦
arcsin(x)
。
x:R,
结果类型同
x,
结果为弧度
,
值域
:0
~π
ASIND(x)*
ATAN(x)*
ATAND(x)*
ATAN2(y,x)
ATAN2D(y,x)
COS(x)*
COSD(x)*
COSH(x)
COTAN(x)*
SIN(x)*
SIND(x)*
SINH(x)
TAN(x)*
TAND(x)*
TANH(x)
求
< br>x
的反正弦
arcsin(x)
。
x:R,
结果类型同
x,
结果为度
,
值域
:0
~
180°
求<
/p>
x
的反正切
arctg(x)
。
x:R,
结果类型同
x
,
结果为弧度
,
值域
< br>:-
π
/2
~π
/2
求
x
< br>的反正切
arctg(x)
。
x
:R,
结果类型同
x,
结果为度
,
值域
:-90
~<
/p>
90°
求
x<
/p>
的反正切
arctg(y/
x
)
。
y:R,x
和结果类
型同
x,
结果值域
:-
π~π
求
x
的反正切
arctg(y/
x
)
。
y:R,x
和结果类型同
x,
结果值域
:-180
~
180°
求
x
的余弦
cos(x)
。
x:R
、
C,x
取值弧
度
,
结果类型同
x
求
x
的余弦
cos(x)
。
x:R,x
取值度
,
结果类型同
x
求
x
的双曲余弦
< br>ch(x)
。
x:R,
结果类型
同
x
求
x<
/p>
的余切
ctg(x)
。
< br>x:R,x
取值度
,
结果类型同
x
求
x
的正弦
sin(x)
。
x:R
、
C,x
取值弧度
,
结果类型同
x
求
x
的正弦
sin
(x)
。
x:R,x
取值度
,
结果类型同
x
求
x
的双曲正弦
sh
(x)
。
x:R,
结果类型同
x
求
x
的正切
tg(x)
。
x:R
,x
取值弧度
,
结果类型同
x
求
x
的正切
tg(x)
。
x:R,
x
取值度
,
结果类型同
x
求
x
的双曲正切
th(x)
。
x:R,
结果类型同
x
注：三角函数名前有
C
、
D
的函数为复数、双精度型函数。
表
3
指数、平方根和对数函数
函数名
说明
求
x
的自然对数
ln(x)
。
x:R(4),
结果<
/p>
:R(4)
求
x
以
10
为底一般对数
log
10
(x)
。
x:R(4),
结果
:R(4)
求指数
,
即
e
。
x:R
、
C,
结果类型同
x
x
ALOG(x)
ALOG10(x)
EXP(x)*
LOG(x)*
求自然对数
,
即
e
。
x:R
、
C,
结果类型同<
/p>
x
x
LOG10(x)*
SQRT(x)*
求以
10
为底对数
,
即。
x:R,
结果类型同
x
求
x
的平方根。
< br>x:R
、
C,
结果类型同
x
注：指数函数名、平方根函数名、对数函
数名前有
C
、
D
的函数为复数、双精度型函数。
表
4
参数查询函数
函数名
ALLOCATED(a)*
说明
判定动态数组
< br>a
是否分配内存。
a:A,
结果
:L,
分配
:.TRUE.,
未分配
:.FALSE.
ASSOCIATED(p[,t])*
判定指针
p
是否指向目标
t
。
p:P,t:AT,
结果
< br>:L,
指向
:.TRUE.,
未
指向
:.FALSE.
DIGITS(x)
EPSILON(x)*
HUGE(x)*
ILEN(x)
KIND(x)*
MAXEXPONENT(x)*
MINEXPONENT(x)*
PRECISION(x)*
PRESENT(x)
RADIX(x)
RANGE(x)*
SIZEOF(x)*
TINY(x)*
表
5
实数检测和控制函数
函数名
说明
查询
x
的机内编码数值部分二进制位数
(
除符号位和指数位
)
。
x:I
、
R,
结果
:I
查询
x
类型可表示的最小正实数。
x:R,
结果类型同
x
。
最小正实
数
:1.1920929E-07
查
询
x
类型可表示的最大数。
x:I
、
R,
结果类型同
x
查询
x
的
反码值。
x:I,
结果类型同
x
查询
x
的
kind
参数值。
x:I
、
R
、
C
、
CH
、
L,
结
果
:I
查询
x
的最大正指数值。
x:R,
结果
:I(4)
查询
x
的最大负指数值。
x:R,
结果
:I(4)
查询
x
类型有效数字位数。
x:R
、
C,
结果
:I(4)
查询可选形参
x
是否有对应实参。
x:AT,
结果
:L
。有
:.TRUE.,
没有
:.FA
LSE.
查询
x
类型的基数。
x:I
、
R,
结果
:L
查询
x
类型的指数范围。
x:I
、
R
、
C,
< br>结果
:I(4)
查询
x
的存储分配字节数。
x:AT,
结果
:I(4)
查询
x
的最小正值。
x:R,
< br>结果类型同
x
-
-
-
-
-
-
-
-
-
上一篇：英语单词归类(形容词)
下一篇：中医药大学《医用拉丁语》作业