FORTRAN 知识点总结.doc

FORTRAN第2章 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个字符；组成成分是字母、数字、下划线；第一个字符必须是字母。第3章 基本语句：类型说明语句： 类型说明（种别说明），属性说明：变量名表尽量避免把两个实数作相等或不相等的比较。淘汰隐式说明IMPLICITNONE种别说明：种别参数即对可移植数据精度和范围进行选择的机制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,Y1X表示一个空格，F表示作实型编辑，6表示每个数占六列，2表示小数部分占两列，F前的2表示重复系数。 省略设备号 PRINT 格式说明，输出表表控格式 WRITE(*,*)X,YPRINT*，X,Y第4章 选择结构程序设计：关系与逻辑表达式：=/=;.NOT.AND. .OR. .EQV. .NEQV.混合运算符的优先级别:IF语句与IF结构的区别:IF语句：IF (e)SIF结构：IF (e1)THEN块1ELSE IF(e2)THEN块2ELSE块 nEND IFCASE结构：SELECTCASE(MONTH)CASE(2)DAYS=28CASE(4,6,9,11)DAYS=30.END SELECT第5章 循环结构程序设计：不带循环变量的DO：结构名：DO循环体END DO结构名EXIT语句：停止循环，将控制转移到当前循环之外。 EXITDO结构名CYCLE语句：在循环执行到该语句时，跳过循环体在它后面的那些语句，再从循环体的第1条语句开始执行。CYCLEDO 结构名带循环变量的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)第6章 程序单元和过程：函数子程序：必须提供一个值，这个值赋给结果变量，成为函数的值。RECURSIVE FUNCTION 函数名 （虚元表） RESULT（结果名）子例子程序：本身并不返回值，其计算结果全部通过虚实结合传递给主调程序。必须通过CALL语句来调用。CALL 子程序名（实元表）RECURSIVE SUBROUTINE 子程序名（虚元表）接口块：INTERFACE必须使用：实元是关键字变元时；实元是缺省的可选变元时；一个外部函数使用系统中的内部运算符扩展了原有的功能时；外部过程扩展了赋值号的使用范围时；使用一个类属名调用过程时；调用一个外部过程，该过程的结果是一个数组。虚实结合：实元和虚元的个数相等，相应位置上的类型一致。关键字变元：虚元名=实元表达式可选择变元：OPTIONAL属性：一虚元的类型说明语句中有OPTIONAL属性便是可选变元。PRESENT(X)函数：用来检查它的自变量X是否在程序执行部分出现。当X出现时，函数值为“真”，否则为“假”。虚过程：如果虚元是一个过程名时，作为虚元的过程称为虚过程。只有潜逃调用至少两层以上时才能用虚过程。模块：MODULE 包含程序说明语句和过程，但不能直接运行。其他程序引用模块实际就是将该模块中的全部语句复制到本程序单元，并且所有与模块中的名字相同的变量彼此取值相通，共享存储单元。模块名对程序来说是全局的，不能与本程序中的任何程序单元名、外部名相同，也不得与模块内的任何局部名重名。引用：USE 模块1，模块2，.，模块nUSE 模块名，ONLY：实体名表递归：递归调用是指过程内直接或间接地调用自己。内部过程：如果一个过程不是写在主程序外，而是写在主程序单元之内，作为主程序内包含的一个过程，则该过程为内部过程。通常没有说明语句，一般没有虚元。类属过程：允许不同类型的实元与同一虚元结合，放宽了虚实结合必须一致的条件。超载运算符：标准FORTRAN运算符通过恰当的过程扩展其功能，使其具有新的含义。自定义运算符。超载赋值：指把赋值的含义扩展到新的数据类型。赋值号两边的类型必须相容。第7章 数组：数组基本概念：用DIMENSION属性说明之，同时给出数组元素的起止下标；使用数组时，即可直接使用数组某个元素，也可直接使用数组名。数组片段：代表数组中的部分元素，可连续也可不连续。如：A(3:6)或A(10：30:2)步长是2数组构成器：赋值4个元素的数组：A=(/1,2,3,4/) 其中(/1,2,3,4/)就是数组构成器例：A=(/(SQRT(REAL(I),I=1,4)/) 或 A=(/V(3),V(6),V(7),V(9),/)二维数组按列存放：RESHAPE函数：将数组构成器中的一维数据重新构成任意形的数组。例：A=RESHAPE(SOURCE=(/1,2,3,4,5,6,7,8,9，-1，-2，-3/),SHAPE=(/3,4/)数组形式：常数组REAL,DIMENSION(3:5+7):A 可调数组REAL,DIMENSION(M,N):A 假定形状数组REAL,DIMENSION(:,:):A 动态数组（可变）REAL,DIMENSION(:),ALLOCATABLE:A数组做变元，只能作为过程的实元不能是虚元。数组运算：数组赋值 A=B;数组表达式A+B （对应元素相加）；数组与标量A-5(每个元素减5)；数组作为内在函数的实元B=ABS(A) B与A形状相同。数组内在函数：求数组大小 SIZE(A);求数组最大值元素 MAXVAL(A)；求数组最小值元素 MINVAL(A);求数组最大值元素下标 MAXLOC(A)；求数组最小值元素下标 MINLOC(A).;数组各元素之和 SUM(A);数组各元素之积 PRODUCT(A)；求数组维的下界 LBOUND(A);求数组维的上界 UBOUND(A)；数组转置 TRANSPOSE(A).屏蔽数组赋值：如 WHERE (AXPT1=PT2 表示PT1指向PT2所指的目标，PT1和PT2都指向Y；PT1=PT2 表示将PT2所指的目标的值赋给PT1所指的目标，X=Y。可以有多个指针指向同一个目标，但不允许一个指针同时指向多个目标。指针不但可以指向实型、整型目标，还可以指向字符型和逻辑型目标。第10章 数据文件：OPEN(连接信息表)CLOSE（关闭信息表）UNIT=ut，ut是一个文件号，必须是无符号整数；FILE=fe，fe是字符型数据，代表文件名；STATUS=ss，ss是用户给出的字符串，表示文件的状态，可以是OLD,NEW,REPLACE,SCRATCH,UNKNOW缺省;ACCESS=as,as是字符串，可为SEQUENTIAL顺序的缺省，DIRECT直接的；FORM=fm,fm是字符串，可为FORMA