谁又Fortran常用函数列表

Posted 2023-03-29

好老的语言，网上都搜不到。。。。那位有能发我啊，不甚感激~~~

ABS, AIMAG, AINT, AMAX0, AMIN0, ANINT, CEILING, CMPLX, CONJG, DBLE, DCMPLX, DFLOAT, DIM, DPROD, DREAL, FLOAT, FLOOR, IFIX, IMAG, INT, MAX, MAX1, MIN, MIN1, MOD, MODULO, NINT, QCMPLX, QEXT, QFLOAT, QREAL, RAN, REAL, SIGN, SNGL, ZEXT

EXPONENT, FRACTION, NEAREST, RRSPACING, SCALE, SET_EXPONENT, SPACING

DIGITS, EPSILON, HUGE, ILEN, MAXEXPONENT, MINEXPONENT, PRECISION, RADIX, RANGE, SIZEOF, TINY

DOT_PRODUCT, MATMUL

PROCESSORS_SHAPE, NWORKERS, NUMBER_OF_PROCESSORS, SECNDS

KIND, SELECTED_INT_KIND, SELECTED_REAL_KIND

ACOS, ACOSD, ASIN, ASIND, ATAN, ATAND, ATAN2, ATAN2D, COS, COSD, COSH, COTAN, COTAND, EXP, LOG, LOG10, SIN, SIND, SINH, SQRT, TAN, TAND, TANH
AND, BTEST, IAND, IBCHNG, IBCLR, IBITS, IBSET, IEOR, IOR, ISHA, ISHC, ISHFT, ISHFTC, ISHL, LSHIFT, NOT, OR, RSHIFT, XOR
BIT_SIZE
LEADZ, POPCNT, POPPAR, TRAILZ
LGE, LGT, LLE, LLT
ACHAR, CHAR, IACHAR, ICHAR
ADJUSTL, ADJUSTR, INDEX, LEN_TRIM, REPEAT, SCAN, TRIM, VERIFY
LEN
MERGE, PACK, SPREAD, UNPACK
ALLOCATED, LBOUND, SHAPE, SIZE, UBOUND
MAXLOC, MINLOC
CSHIFT, EOSHIFT, RESHAPE, TRANSPOSE
ALL, ANY, COUNT, MAXVAL, MINVAL, PRODUCT

常用数学函数使用方法

Y=INT(X) 转换为整数 ALL（所有型态） INTEGER
Y=REAL(X) 转换为实数 INTEGER REAL
Y=DREAL(X) 取复数实部（倍精度） COMPLEX*16 REAL*8
Y=DIMAG(X) 取复数虚部（倍精度） COMPLEX*16 REAL*8
Y=CONJG(X) 共轭复数 COMPLEX COMPLEX
Y=DCONJG(X) 共轭倍精度复数 COMPLEX*16 COMPLEX*16
Y=DBLE(X) 转换为倍精度实数 ALL REAL*8
Y=CMPLX(X1,X2) 转换为复数 ALL,ALL COMPLEX
Y=DCMPLX(X1,X2) 转换为倍精度复数 ALL,ALL COMPLEX*16
Y=IABS(X) 整数绝对值 INTEGER INTEGER
Y=DABS(X) 倍精度实数绝对值 REAL*8 REAL*8
Y=CDABS(X) 倍精度复数绝对值 COMPLEX*16 REAL*8
Y=MOD(X1,X2) 整数X1/X2之余数 INTEGER,INTEGER INTEGER
Y=DMOD(X1,X2) 倍精度实数X1/X2之余数 REAL*8,REAL*8 REAL*8
Y=ISIGN(X1,X2) 取X1之值与X2之正负号 INTEGER,INTEGER INTEGER
Y=SIGN(X1,X2) 取X1之值与X2之正负号 REAL,REAL REAL
Y=DSIGN(X,Y) 取X1之值与X2之正负号 REAL*8,REAL*8 REAL*8
Y=DSQRT(X) X的倍精度平方根 REAL*8 REAL*8
Y=CDSQRT(X) X的倍精度复数平方根 COMPLEX*16 COMPLEX*16
Y=DEXP(X) X的倍精度指数 REAL*8 REAL*8
Y=CDEXP(X) X的倍精度复数指数 COMPLEX*16 COMPLEX*16
Y=DLOG(X) X的倍精度自然对数 REAL*8 REAL*8
Y=CDLOG(X) X的倍精度复数自然对数 COMPLEX*16 COMPLEX*167
Y=DLOG10(X) X的倍精度常用对数 REAL*8 REAL*8
Y=DSIN(X) X的倍精度正弦函数 REAL*8 REAL*8
Y=DCOS(X) X的倍精度余弦函数 REAL*8 REAL*8
Y=DTAN(X) X的倍精度正切函数 REAL*8 REAL*8
Y=DASIN(X) X的倍精度正弦反函数 REAL*8 REAL*8
Y=DACOS(X) X的倍精度余弦反函数 REAL*8 REAL*8
Y=DATAN(X) X的倍精度正切反函数 REAL*8 REAL*8
Y=DSINH(X) X的倍精度双曲正弦函数 REAL*8 REAL*8
Y=DCOSH(X) X的倍精度双曲余弦函数 REAL*8 REAL*8
Y=DTANH(X) X的倍精度双曲正切函数 REAL*8 REAL*8 参考技术A ABS,
AIMAG,
AINT,
AMAX0,
AMIN0,
ANINT,
CEILING,
CMPLX,
CONJG,
DBLE,
DCMPLX,
DFLOAT,
DIM,
DPROD,
DREAL,
FLOAT,
FLOOR,
IFIX,
IMAG,
INT,
MAX,
MAX1,
MIN,
MIN1,
MOD,
MODULO,
NINT,
QCMPLX,
QEXT,
QFLOAT,
QREAL,
RAN,
REAL,
SIGN,
SNGL,
ZEXT
EXPONENT,
FRACTION,
NEAREST,
RRSPACING,
SCALE,
SET_EXPONENT,
SPACING
DIGITS,
EPSILON,
HUGE,
ILEN,
MAXEXPONENT,
MINEXPONENT,
PRECISION,
RADIX,
RANGE,
SIZEOF,
TINY
DOT_PRODUCT,
MATMUL
PROCESSORS_SHAPE,
NWORKERS,
NUMBER_OF_PROCESSORS,
SECNDS
KIND,
SELECTED_INT_KIND,
SELECTED_REAL_KIND
ACOS,
ACOSD,
ASIN,
ASIND,
ATAN,
ATAND,
ATAN2,
ATAN2D,
COS,
COSD,
COSH,
COTAN,
COTAND,
EXP,
LOG,
LOG10,
SIN,
SIND,
SINH,
SQRT,
TAN,
TAND,
TANH
AND,
BTEST,
IAND,
IBCHNG,
IBCLR,
IBITS,
IBSET,
IEOR,
IOR,
ISHA,
ISHC,
ISHFT,
ISHFTC,
ISHL,
LSHIFT,
NOT,
OR,
RSHIFT,
XOR
BIT_SIZE
LEADZ,
POPCNT,
POPPAR,
TRAILZ
LGE,
LGT,
LLE,
LLT
ACHAR,
CHAR,
IACHAR,
ICHAR
ADJUSTL,
ADJUSTR,
INDEX,
LEN_TRIM,
REPEAT,
SCAN,
TRIM,
VERIFY
LEN
MERGE,
PACK,
SPREAD,
UNPACK
ALLOCATED,
LBOUND,
SHAPE,
SIZE,
UBOUND
MAXLOC,
MINLOC
CSHIFT,
EOSHIFT,
RESHAPE,
TRANSPOSE
ALL,
ANY,
COUNT,
MAXVAL,
MINVAL,
PRODUCT
常用数学函数使用方法
Y=INT(X)
转换为整数
ALL（所有型态）
INTEGER
Y=REAL(X)
转换为实数
INTEGER
REAL
Y=DREAL(X)
取复数实部（倍精度）
COMPLEX*16
REAL*8
Y=DIMAG(X)
取复数虚部（倍精度）
COMPLEX*16
REAL*8
Y=CONJG(X)
共轭复数
COMPLEX
COMPLEX
Y=DCONJG(X)
共轭倍精度复数
COMPLEX*16
COMPLEX*16
Y=DBLE(X)
转换为倍精度实数
ALL
REAL*8
Y=CMPLX(X1,X2)
转换为复数
ALL,ALL
COMPLEX
Y=DCMPLX(X1,X2)
转换为倍精度复数
ALL,ALL
COMPLEX*16
Y=IABS(X)
整数绝对值
INTEGER
INTEGER
Y=DABS(X)
倍精度实数绝对值
REAL*8
REAL*8
Y=CDABS(X)
倍精度复数绝对值
COMPLEX*16
REAL*8
Y=MOD(X1,X2)
整数X1/X2之余数
INTEGER,INTEGER
INTEGER
Y=DMOD(X1,X2)
倍精度实数X1/X2之余数
查看原帖>> 参考技术B 查一本叫Fortran90 Explained的书。是Oxford出版的，基本上还算权威。

fortran关于数组内部函数的问题

fortran关于数组内部函数的问题
这个是什么错误，数组内部求和函数要怎么用，图中程序应该怎么改

sum函数用法错误，fortran中自带数组求和函数SUM。传入的变量应该是数组的某一段值。也就是说二维数组A(5，3) 求和时要写成sum2 = sum(A(1:5,1:3)). 参考技术A sum2 = sum( A ) 参考技术B 没有sum这个函数。 自己编一个吧。