-
表
1
数值和类型转换函数
函数名
ABS(x)*
AIMAG(x)
AINT(x[,kind])*
A
MAX0(x
1
,x
2
,x
3
,
?
< br>)*
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<
/p>
,x
3
,
?
)*
MIN1(x
1
,x
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:C,
结果
:R
对
x
取整
,
并转
换为实数
(kind)
。
x:R,
kind:I,
结果
:R(kind)
求
x
1
,x
2
,x
3
,
< br>?中最大值。
x
I
:I,
结果
:R
求
x
1
,x
2<
/p>
,x
3
,
?中最
小值。
x
I
:I,
结果
:R
对
x
四舍五入取整
,
并转换为实数
(kind)
。
x:
R, kind:I,
结果
:R(kind)
求大于等于
x
的最小整数。
x:R,
结果
:I
将参数转换为
x
、
(x,0.
0)
或
(x,y)
。
< br>x:I
、
R
、
< br>C,
y:I
、
R,kind:I,
结果
:C(kind)
求
x
的共轭复数。
x:C,
结果
:C
将
x
转换为双精度实数。
x:I
、
R
、
C,
结果
:R(8)
将参数转换为
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,
结果类型同<
/p>
x
求
x
和
y
的乘积
,
并转换为双精度实数。
x:R, y:R,
结果
:R(8)
将
x
转换为单精度实数。
x:I,
结果
:R
求
小于等于
x
的最大整数。
x:R,
结果
:I
将
x
转换为整数
(
取整
)
。
x:R,
结果
:I
同
AIMAG(x)
将
x
转换为整数
(
取整
)
。
x:I
、
R
、
C,
kind:I,
结果
:I(kind)
按
kind
值转换新逻辑值。
x:L,
结果
:L(kind)
求
x
1
,x<
/p>
2
,x
3
,
?中最大值。
x
I
为任意类型
,
结果类型同
x
I
求
x
1
,x
2
,x
3
,
?中最大值
(
取整
)
。
x
I
:R,
结果
:I
求
x
1
,x
2<
/p>
,x
3
,
?中最
小值。
x
I
为任意类型
,
结果类型同
x
I
求
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
余数
,
值为
x-FLOOR(x/y)*y
。
x:I
、
R,
y
的类型同
x,
结果类型同
x
将
x
转换为整数
(
< br>四舍五入
)
。
x:R,
kind:I,
结果
:I(kind)
将
x
转换为实数。
x:I<
/p>
、
R
、
C,
kind:I,
结果
:R(kind)
求
x
的绝对值乘以
y
的符号。
x:I
、
R
, y
的类型同
x,
结果类型同
x
将双精度实数转换为单精度实数。
x:R(8),
结果
:R
用
0
向左侧扩展
x
。
x:I
、
L,
结果
:I
说明
求
x<
/p>
的绝对值∣
x
∣。
x:I
、
R,
结果类型同
x; x:C,
结果
:R
说明
表
2
三角函数
函数名
ACOS(x)*
ACOSD(x)*
ASIN(x)*
ASIND(x)*
求
x
的反余弦
arccos(x)
。
x:R,
结果类型同
x,
结果值域
:0~
π
求
x
的反余弦
arccos(x)
。
x:R,
结果类
型同
x,
结果值域
:0~180
°
求
x
的反正弦
arcsin(x)
。
< br>x:R,
结果类型同
x,
结果为
弧度
,
值域
:0~
π
求
x
的反正弦
arcsin(x)
。
x:R
,
结果类型同
x,
结果为度
,
值域
:0~180
°<
/p>
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
的反正切
arctg(x)
。
x:R,
结果类型同
x,
结果为弧度
,
值域
:-
π
/2~
π
/2<
/p>
求
x
的反正切
arctg(x)
。
x:R,
结果类型同
x,
结果为度
,
值域
:-90~90
°
求
x
的反正切
arctg(y/
x
)
。
y:R,x
和结果类型同
x,
结果值域
:-
π
~<
/p>
π
求
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
的双曲余弦
ch(x
)
。
x:R,
结果类型同
x
求
x
< br>的余切
ctg(x)
。
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
、
< br>D
的函数为复数、双精度型函数。
表
3
指数、平方根和对数函数
函数名
ALOG(x)
ALOG10(x)
EXP(x)*
LOG(x)*
LOG10(x)*
SQRT(x)*
说明
求
x<
/p>
的自然对数
ln(x)
。
x:R(4),
结果
:R(4)
求
x
以
1
0
为底一般对数
log
10
(x)
。
x:R(4),
结果
:R(4)
求指数
,
即
e
。
< br>x:R
、
C,
结果类型同
x
x
求自然对数<
/p>
,
即
e
。
x:R
、
C,
结果类
型同
x
x
求
以
10
为底对数
,
即。
x:R,
结果类型同
x
求
x
的平方根。<
/p>
x:R
、
C,
结
果类型同
x
表
4
参数查询函数
注：指数函数名、平方
根函数名、对数函数名前有
C
、
D
的函数为复数、双精度型函数。
函数名
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)*
查询
x
的机内编码数值部分二进制位数
(
除符号位和指数位
)
。
x:
I
、
R,
结果
:I
查询
x
类型可表示的最小正实数。
x:R,
结果类型同
x
。
最小正实数
:1.192
0929E-07
查询
x
类型可表示的最大数。
x:I
、
< br>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,
< br>结果
:I(4)
查询可选形参
x
是否有对应实参。
x:AT,
结果
:L
。有
:.T
RUE.,
没有
:.FALSE.
<
/p>
查询
x
类型的基数。
x:I
、
R,
结果
:L
查询
x
类型的指数范围。
x:I
、
R
、
C,
结果
:
I(4)
-
-
-
-
-
-
-
-
-
上一篇：常见中草药—根类
下一篇：英语单词归类(形容词)