常用的Fortran函数

常用的Fortran77函数函数名含义应用例子相当数学上的运算ABSEXPSINCOSASINACOSTANATANLOGLOGlOINTMODSIGNREALMAXMIN求绝对值指数运算正弦值余弦值反正弦反余弦正切反正切自然对数常用对数取整求余求符号转换为实型求最大值求最小值ABS(X)EXP(X)SIN(X)COS(X)ASIN(X)ACOS(X)TAN(X)ATAN(X)ALOG(X)ALOG10(X)INT(X)MOD(X1，X2)SIGN(Xl，X2)REAL(I)MAX0(I1，I2，I3)MIN(Xl，X2，X3)x)exp(xxsinxcosxarcsinxarccosxtanxarctanxlnx10logxint，取x的整数部分221intxxxx1x(当02x)，1x(当02x)321,,maxiii321,,minxxxF90数组运算内在函数表函数名称描述ALL(mask[,dim])判断全部数组值在指定维上是否都满足mask的条件ANY(mask[,dim])判断是否有数组值在指定维上满足mask的条件COUNT(mask[,dim])统计在指定维上满足mask的条件的元素个数CSHIFT(array,shift[,dim])进行指定维上的循环替换DOT_PRODUCT(vector_a,vector_b)进行两个向量的点乘EOSHIFT(array,shift[,boundary][,dim])在指定维上替换掉数组末端，复制边界值到数组末尾LBOUND(array[,dim])返回指定维上的下界MATMUL(matrix_a,matrix_b)进行两个矩阵(二维数组)的乘积MAXLOC(array[,dim][,mask])返回数组的全部元素或指定维元素当满足mask条件的最大值的位置MAXVAL(array[,dim][,mask])返回在指定维上满足mask条件的最大值MERGE(tsource,fsource,mask)按mask条件组合两个数组MINLOC(array[,dim][,mask])返回数组的全部元素或指定维元素当满足mask条件的最小值的位置MINVAL(array[,dim][,mask])返回在指定维上满足mask条件的最小值PACK(array,mask[,vector])使用mask条件把一个数组压缩至vector大小的向量PRODUCT(array[,dim][,mask])返回在指定维上满足mask条件的元素的乘积RESHAPE(source,shape[,pad][,order])使用顺序order和补充pad数组元素来改变数组形状SHAPE(source)返回数组的形状SIZE(array[,dim])返回数组在指定维上的长度SPREAD(source,dim,ncopies)通过增加一维来复制数组SUM(array[,dim][,mask])返回在指定维上满足mask条件的元素的和TRANSPOSE(matrix)转置二维数组UBOUND(array[,dim])返回指定维上的上界UNPACK(vector,mask,field)把向量在mask条件下填充field的元素解压至数组