- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
Fortran 实用编程
Fortran Coder 研讨团队
系列视频教程
关于 Fortran Coder
Fortran Coder 始于2006年,是一个以科学计算编程为主题的非盈利性研讨团体。大多数由各行业高等学府学生,研究人员及生产一线的工作人员组成。
研讨内容涉及:Fortran77/90/95/2003/2008语法规范,各平台32位及64位编译器,IMSL,MKL,Lapack 等数学函数库,MPI,OpenMP,Coarray 并行及高性能计算,winteracter / DisLin / Matfor / GTKFortran 等绘图及界面库。
关于本套视频
本套视频以解决实际问题为主要目的,旨在为您解答课本上较少涉及到的实际问题。通过本套视频,您会更容易了解:
如何查找错误?如何解决错误?
如何学习 Fortran2003 和 Fortran2008 语法?
如何用最通俗易懂的写法解决实际问题?
如何看懂别人的优秀代码并为自己所用?如何让自己的代码更优美、更普适?
本套视频由 Fortran Coder 研讨团队录制,供所有 Fortran 程序员和学习者免费自由的观看,您可随意的传播它。但请保证视频完整性。
我们将会不定期的更新本套视频,请持续关注我们的网站、QQ群!
同时,如果您对 Fortran 相关有自己的见解,并愿意通过录制视频的方式与其他人分享,请联系我们!
上节要点回顾
1.流程控制结构包括 if、select、do 等
2.条件判断必须是一个逻辑型单变量,而不能是数组,可利用any、all函数。
3.if 和 do 可以署名,一方面便于代码阅读,另一方面便于在多层嵌套时跳出(exit)或跳入下次循环(cycle)
4.goto和老语法及替换
第7讲
基础篇 第7讲
数组和结构体
讲解人:阿斯达卡
flybird@
讨论QQ群:2338021
目 录
目 录
聚合数据
最常见的数据:
枚举(parameter)
数组(dimension)
结构体(type)
类(class,type derived)
聚合数据-枚举类型
聚合数据-数组类型
聚合数据-结构体类型
聚合数据-类 类型
目 录
数组
分类
定义
访问方式
函数
数组
分类
固定大小数组
静态数组(声明)
自动数组(传参)
动态分配数组
数组
定义
type, DIMENSION(bound) [,attr] :: name
type [,attr] :: name (bound)
例如:
INTEGER, DIMENSION(100) :: IARR
REAL:: FARR(1:100), CARR(0:99)
CHARACTER(LEN=256) :: CONTENTS(80) !派生数据数组
REAL, DIMENSION(5) :: RARR, RXARR(10) !混合定义
数组
访问方式
整体
元素
片段
不连续段
数组
函数
SQRT(num) Elemental intrinsic procedures
DOT_PRODUCT( VECTOR_A, VECTOR_B )
MATMUL( MATRIX_A, MATRIX_B )
SUM( ARRAY [, DIM] [, MASK] )
PRODUCT( ARRAY [, DIM] [, MASK] )
MAXLOC( ARRAY [, MASK] )
MAXVAL( ARRAY [, DIM] [,MASK] )
数组
求解ax=b,a为带宽p+q-1的矩阵
要点:
矩阵的压缩保存
矩阵的LU分解
方程的求解
目 录
结构体
定义
访问方式
类
结构体
定义
TYPE [[,attr-list] :: ] name [(type-param-name-list)]
[type-param-def-stmts]
[PRIVATE statement or SEQUENCE statement]. . .
[component-definition]. . .
[type-bound-procedure-part]
END TYPE [name]
访问方式
TYPE%MEM
感谢收看!
Fortran Coder Group
还有疑问?请联系我们
下一讲:函数和子例行程序
敬请关注 期待
文档评论(0)