FORTRAN90用法总结.doc

FORTRAN90用法总结.doc

ID:49620063

大小:1.27 MB

页数:5页

时间:2020-03-02

FORTRAN90用法总结.doc_第1页
FORTRAN90用法总结.doc_第2页
FORTRAN90用法总结.doc_第3页
FORTRAN90用法总结.doc_第4页
FORTRAN90用法总结.doc_第5页
资源描述:

《FORTRAN90用法总结.doc》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、FORTRAN90用法总结1、数据类型整型INTEGER实型REAL复型COMPLEX字符型CHARACTER逻辑型LOGICAL2、特殊函数1>定值函数PARAMETER(变量列表)或类型说明符,PARAMETER::变量列表2>IMPLICIT类型说明符(字母表)类型定义函数(默认I-N规则,取消IMPLICITNONE)3>**乘方4>STOP[标号]终止执行5>PAUSE[标号]暂停程序6>字符串长度函数LEN(String)、LEN_TRIM(String)7>除去字符串尾部空格TRIM(String)8>字符串位置函数INDEX(String1,String2)9>

2、字符串比较函数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>.AND.与.OR.或.NOT.非.EQV.等于.NEQV.不等.

3、XOR.异或3、IF函数1>单支IFIF(逻辑表达式)THEN块语句ENDIF2>双支IFIF(逻辑表达式)THEN块语句1ELSE块语句2ENDIF3>多支IFIF(逻辑表达式1)THEN块语句1ELSEIF(逻辑表达式2)THEN块语句1...ELSEIF(逻辑表达式N)THEN块语句NELSE块语句N+1ENDIF4>逻辑IFIF(条件表达式)可执行语句5>算术IFIF(算术表达式)标号1,标号2,标号3标号1可执行语句1标号2可执行语句2标号3可执行语句34、CASE块SELECTCASE(表达式)CASE(表达式1)块语句1...CASE(表达式N)块语句NCASED

4、EFAULT默认块语句ENDSELSCT5、循环函数1>循环控制语句IF(e)EXIT终止循环2>CYCLE跳出此次循环3>DO循环DOi=e1,e2[,e3]循环体ENDDO4>DOWHILE循环DOWHILE(逻辑表达式)循环体ENDDO6、输入输出1>表控输入输出READ*,变量表PRINT*,输出表WRITE(*,*)输出表2>自定义输入输出标号FORMAT(格式说明)3>其他编辑符①nX向右跳过n个字符②nH输出字符串③/换行④连接7、数组1>说明数组DIMENSION数组名类型说明,DIMENSION(维说明)::数组名2>数组赋初值DATA数组名/....../

5、,数组名/....../,...3>动态数组①声明[类型],DIMENSION(:[,:]...),ALLOCATABLE::数组名[类型],ALLOCATABLE::数组名(:[,:]...)...②申请ALLOCATE(数组名(维说明))③释放DEALLOCATE(数组名)8、子程序1>子程序CONTAINS(内部子程序的标志(外部EXTERNAL))[类型说明]FUNCTION函数名(虚参表)函数体END2>子例行程序SUBROUTINE子例行程序名(虚参表)函数体END调用CALL子例行程序名(实参表)3>递归调用RECURSIVEFUNCTION(SUBROUTINE

6、)函数名(虚参表)RESULT(返回值)函数体END9、结构体1>定义TYPE[,ACCESS[::]]派生类名称(ACCESS=PRIVATE(私有),PUBLIC(公有))分量表ENDTYPE派生类名称2>类型定义TYPE(派生类名称)::结构体变量名3>结构体成员引用①结构体名%成员名②结构体名.成员名4>定义的同时赋值TYPE(派生数据类型名)::结构体变量名=派生数据类型名(成员初值表)5>结构体数组TYPE(派生数据类型名),DIMENSION(维说明符)::结构体数组名10、指针1>定义指针类型说明,POINTER::指针变量名...类型说明,TARGET::目标

7、变量名...P=>A2>动态变量例:INTEGER,POINTER::PINTEGERSALLOCATE(P)P=4S=PDEALLOCATE(P)PRINT*,SEND3>指针数组变量定义类型说明,DIMENSION(:...:),POINTER::指针变量名ALLOCATE(X(20))DEALLOCATE(X)4>定义结点TYPENODEINTEGERVALUETYPE(NOPE),POINTER::NEXTENDTYPENODE5>定义头指针TYPELISTPRIVATETYPE(N

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。