FORTRAN90用法总结.doc

FORTRAN90用法总结
数据类型
整型 INTEGER
实型 REAL
PLEX
字符型 CHARACTER
逻辑型 LOGICAL
特殊函数
1>定值函数 PARAMETER(变量列表) 或类型说明符,PARAMETER::变量列表
2>IMPLICIT 类型说明符(字母表)类型定义函数(默认I-N规则,取消IMPLICIT NONE)
3>** 乘方
4>STOP[标号]终止执行
5>PAUSE[标号]暂停程序
6>字符串长度函数 LEN(String)、 LEN_TRIM(String)
7>除去字符串尾部空格 TRIM(String)
8>字符串位置函数 INDEX(String1,String2)
9>字符串比较函数
LGE(String1,String2)
LGT(String1,String2)
LLE(String1,String2)
LLT(String1,String2)
10>字符串空格首位调整
ADJUSTL(String)、ADJUSTR(String)
11>字符串、ASSII码互相转化函数
①化为ASSII码 ICHAR(String)、IACHAR(String)
②化为字符串CHAR(I)、ACHAR(I)
12>.LT.(<) .LE.(<=) .EQ.(=) .NE.(/=) .GT.(>) .GE.(>=)
13>.
IF函数
1> 单支IF
IF(逻辑表达式) THEN
块语句
END IF
2> 双支IF
IF(逻辑表达式) THEN
块语句1
ELSE
块语句2
END IF
3>多支IF
IF(逻辑表达式1) THEN
块语句1
ELSE IF(逻辑表达式2) THEN
块语句1
...
ELSE IF(逻辑表达式N) THEN
块语句N
ELSE
块语句N+1
END IF
4>逻辑IF
IF(条件表达式)
可执行语句
5>算术IF
IF(算术表达式)标号1,标号2,标号3
标号1 可执行语句1
标号2 可执行语句2
标号3 可执行语句3
CASE块
SELECT CASE(表达式)
CASE(表达式1)
块语句1
...
CASE(表达式N)
块语句N
CASE DEFAULT
默认块语句
END SELSCT
循环函数
1>循环控制语句
IF(e) EXIT 终止循环
2>CYCLE
跳出此次循环
3>DO循环
DO i=e1,e2[,e3]
循环体
END DO
4>DO WHILE循环
DO WHILE(逻辑表达式)
循环体
END DO
输入输出
1>表控输入输出
READ *,变量表
PRINT *,输出表
WRITE(*,*)输出表
2>自定义输入输出
标号 FORMAT(格式说明)
3>其他编辑符
① nX 向右跳过n个字符
② nH 输出字符串
③/ 换行