Fortran 95常用关键字

Fortran 95常用关键字

1、数据类型：整型，实型（浮点型），复数型，逻辑型，字符型

自定义数据类型（TYPE）

2、逻辑运算

==，/=，>，<，>=，<=

.AND., .OR., .NOT., .EQV., .NEQV.

3、输入输出格式

A, F, E, I, X, /

4、常用命令关键字

SELECT, PROGRAM, PRINT, STOP, END, WRITE, INTEGER, REAL, COMPLEX, CHARACTER, LOGICAL, READ, FORMAT, IMPLICIT, PARAMETER, DATA, EQUIVALENCE, TYPE, PAUSE, CONTINUE, CYCLE, EXIT, IF, SELECT, DO, ALLOCATE, DEALLOCATE, WHERE, FORALL, SUBROUTINE, CALL, RETURN, FUNCTION, COMMON, BLOCK DATA, SAVE, INTERFACE, CONTAINS, MODULE, USE, PUBLIC, PRIVATE, ENTRY, OPEN, INQUIRE, CLOSE, NAMELIST, POINTER, NULLFY, REWIND, BACKSPACE, ENDFILE

5、常用属性关键字

PARAMETER（见命令）, ALLOCATABLE, EXTERNAL, SAVE（见命令）, INTENT(IN), INTENT(OUT), INTENT(INOUT), INTRINSIC, OPTIONAL, RECURSIVE, TARGET, POINTER（见命令）, PUBLIC（见命令）, PRIVATE（见命令）

6、函数

CHAR( ), ICHAR( ), LEN( ), LEN_TRIM( ), INDEX( ), TRIM( ), SELECTED_INT_KIND( ), SELECTED_REAL_KIND( ), ALLOCATED(), RANDOM_SEED( ), RANDOM_NUMBER( ), ASSOCIATED( ), PRESENT( ), NULL(), REAL(), INT()

7、参数

KIND, LEN, RESULT, UNIT, FILE, EXIST, STATUS, IOSTAT, NML, FMT, ACCESS, RECL

8、特殊格式

字符串定界符，逻辑值定界符

字符串名(a:b) 字符串取子串操作

字符串a//字符串b 字符串连接操作

9、控制结构

分支 IF(条件表达式) THEN……ELSE……END IF

多重判断语句IF(条件表达式) THEN…ELSE IF(条件表达式) THEN…ELSE IF(条件表达式) THEN ……ELSE…END IF

嵌套IF结构

SELECT CASE语句

CASE()中只能用整型、字符型、逻辑型常量

CASE(A), CASE(A, B), CASE(A:B)意义。

10、循环

CYCLE，EXIT

计数循环：

DO 计数器=初始值，终止值，增量

END DO

条件循环：

DO WHILE(条件表达式)

END DO

条件为真的循环

DO WHILE(.TRUE.)

END DO

11、数组

数组大小用常量声明，特殊下标的声明

赋初值，隐含式循环，列优先存储方式

WHERE, FORALL（并行运算模式）

12、指针

POINTER，TARGET，指向，数组指针，断开引用，指针的动态内存分配与内存的回收ASSOCIATED()，ALLOCATE，DEALLOCATE，NULLFY，NULL()

13、文件

INQUIRE：FILE，EXIST，IOSTAT

OPEN：UNIT，FILE，FORM，STATUS，ACCESS，IOSTAT，RECL

READ/WRITE：UNIT，FMT，NML，REC，IOSTAT

NML

字符串文件

REWIND，BACKSPACE，ENDFILE

CLOSE：UNIT，STATUS，IOSTAT

14、过程

SUBROUTINE......END SUBROUTINE

CALL，RETURN

FUNCTION......END FUNCTION

EXTERNAL

过程中的变量传递

INTENT

SAVE

MODULE......END MODULE

USE

CONTAINS

INTERFACE......END INTERFACE

OPTIONAL，RESENT()

PUBLIC，PRIVATE

RECURSIVE，RESULT

ENTRY