FORTRAN 知识点总结.docVIP

FORTRAN FORTRAN90基础知识： 程序单元的概念: fortran90程序是一种分块形式的程序，整个程序由若干程序单元块组成。每个程序只有一个主程序单元。各单元体的程序体形式上相同。 程序单元可以是主程序、子程序（外部过程或内部过程）、模块MODULE（供其他程序单元引用即把该程序单元内的全部语句复制到程序单元中）或块数据程序单元BLOCK。 语言元素：指在程序设计中用到的基本成分，如字符集、常量、变量、记号（标号、关键字、名字、常数、运算符和定界符）以及其他的基本结构等。 字符集：英文字母、阿拉伯数字、下划线、21个特殊字符（$和？没有规定用法）。 数据结构： 整型INTEGER（34-2 下划线后面是种别参数），n位字长的计算机的数据表示范围一般为，种别参数由内在询问函数KIND送回，种别值提供的最小范围由内在函数SELECTED-INT-KIND送回，表示十进制幂的范围由内在函数RANGE送回； 实型REAL，小数形式和指数形式；复型COMPLEX（种别类型参数值取实部与虚部中较大者）； 字符型CHARACTER，由一对单撇号或双撇号之间的字符序列组成； 逻辑型LOGICAL。 派生数据类型TYPE； 数组 INTEGER,DIMENSION(1,50)::A，可直接对数组元素进行运算如3*A,SQRT(A)； 字符子串，在字符串CHARACTER(LEN=80)::ROW中，ROW(1:3)就表示字符串ROW中第1到第3个元素组成的子串。 变量名的命名规则：不能超过31个字符；组成成分是字母、数字、下划线；第一个字符必须是字母。 基本语句： 类型说明语句： 类型说明（种别说明），属性说明：：变量名表 尽量避免把两个实数作相等或不相等的比较。淘汰隐式说明IMPLICIT NONE 种别说明：种别参数即对可移植数据精度和范围进行选择的机制 KIND(X) 返回变元X的种别参数值 SELECTED-REAL-KIND(n,m) 产生一个种别值，它表示某一精度和范围。N指十进制有效位数，m指明值范围内以10为底的幂次。 种别表示方法：数值型常数、逻辑型常数的种别用后缀法表示，字符型用前缀法。 属性说明：PARAMETER 常量名属性，如INTEGER,PARAMETER::N=5（N值不可更改）；DIMENSION 数组属性，如INTEGER DIMENDION（1:10）：：X。 算术表达式：**乘方。 ABS 绝对值；MAX 最大值；MIN 最小值；SQRT 平方根；MOD 求余数。COS,SIN,TAN,ATAN,LOG 自然对数,LOG10 常用对数，EXP 指数，SIGN 符号。 输入：READ(部件号，格式说明)输入 如READ(5，(I7))X,Y I7表示每行输入一个整数，每个数占7个字符。表控格式 READ *,输入表；READ(*，*)输入表。 输出:WRITE(部件号，格式说明)输出表 WRITE(6，(1X,2F6.2))X,Y 1X表示一个空格，F表示作实型编辑，6表示每个数占六列，2表示小数部分占两列，F前的2表示重复系数。 省略设备号 PRINT 格式说明，输出表 表控格式 WRITE(*,*)X,Y PRINT*，X,Y 选择结构程序设计： 关系与逻辑表达式： == = = /=; .NOT. .AND. .OR. .EQV. .NEQV. 混合运算符的优先级别: IF语句与IF结构的区别: IF语句：IF (e) S IF结构：IF (e1) THEN 块1 ELSE IF(e2) THEN 块2 ELSE 块 n END IF CASE结构：SELECT CASE(MONTH) CASE(2) DAYS=28 CASE(4,6,9,11) DAYS=30 ......... END SELECT 循环结构程序设计： 不带循环变量的DO： [结构名：] DO 循环体 END DO[结构名] EXIT语句：停止循环，将控制转移到当前循环之外。 EXIT [DO结构名] CYCLE语句：在循环执行到该语句时，跳过循环体在它后面的那些语句，再从循环体的第1条语句开始执行。 CYCLE [DO 结构名] 带循环变量的DO： [结构名：] DO [,] v=u1,u2,[u3] 循环体 END DO[结构名] DO While结构: [结构名：] DO WHILE (逻辑表达式) 循环体 END DO[结构名] 隐DO循环：（list,v=u1,u2,u3） 如 READ*,(A(I),I=1,5) 程序单元和过程： 函数子程序：必须提供一个值，这个值赋给结果变量，成为函数的值。 [RECURSIVE] FUNCTION 函数名 （虚元表）