Fortran 库函数（持续更新中）

1. FORTRAN调用shell函数
   I=SYSTEM(‘command’)
   例：I=SYSTEM(‘ls *.txt > filelist’)将当前目录下.txt文件名保存到filelist

2. FORTRAN取整函数
   AINT(x[,kind]) 对x取整，并转换为实数
   ANINT(x[,kind]) 对x四舍五入取整，并转换为实数
   CEILING(x) 求大于等于x的最小整数
   FLOOR(x) 求小于等于x的最大整数
   IFIX(x) 将x转换为整数
   INT(x) 将x转换为整型
   例：          a=1.56 b=-2.5
   AINT对应值    1.000  -2.000
   ANINT对应值   2.000  -3.000
   CEILING对应值 2      -2
   FLOOR对应值   1      -3
   IFIX对应值    1      -2
   INT对应值     1      -2

3. 计算时间统计
   call CPU_TIME(t1) 放在开始计算前
   call CPU_TIME(t2) 放在计算结束后
   t=t2-t1

4. 统计函数

   (1) 计算最大值，最小值

       MAX(v1,v2,...)找出v1,v2...中的最大值，此函数没法判断一个数组的最大值

       MAXVAL(A,dim) 根据dim值找出一个数组中每一维的最大值

       MAXVAL(A) 返回整个数组的最大值

       MAXLOC(A,dim) 根据dim值找出一个数组中每一维最大值的位置

       同理：MINVAL,MINLOC相应的范围数组的最小值和最小值的位置

       例： 数组A（5,2），值为/1.2,3.5,4.6,8.7,9.6

                               2.3,63,3.9,6.8,1.6/   

       MAXVAL(A)           结果为63

       MAXVAL(A,1)         结果为9.6 63

       MAXLOC(A,1)         结果为5  2

   (2) 求和函数

       SUM(A,dim)根据dim求出每一dim数组元素的和

       例： 数组A（5,2），值为/2.3,3.6,4.7,5.8,6.9

                               1.0,1.3,3.6,7.3,4.5/   

       SUM(A)           结果为41.00

       SUM(A,2)         结果为3.3 4.9 8.3 13.1 11.4

       SUM(A,1)         结果为23.3 17.7