第9章 Fortran中的数组

动态数组占用的内存可以释放掉。
§6.2 动态数组
动态数组的定义方式: 类型说明,Dimension(RANK),Allocatable::数组 名 RANK规定了数组的维数, 一个:代表一维，: 之间用逗号隔开。不能指定各维的上下界。
Real,Dimension(:),ALLocatable::A Real,Allocatable::B(:,:,:) 定义了一维动态数组A与三维动态数组B。 注意其区别。
定义数组时,下标界限必须为整型常量。
例:DIMENSION A(12), IW(4,5) 定义一维实型数组A,下标从1到12,12个元素;定 义二维整型数组IW,4行5列,20个元素。
例:INTEGER,DIMENSION(-2:10):: P 定义一维整数组P,下标从-2到10,13个元素。
例: real,dimension(3,4)::b,m(-5:10) 定义二维实型数组B,3行4列,12个元素;定义一 维实型数组M,下标从-5到10,16个元素。
例: character c(100)*20 定义一维字符数组C,有100个字符串,每个可容 纳20个字符
§6.1.2 数组的逻辑结构与存储结构
一维数组:数列、向量 二维数组:矩阵、行列式、表格 三维数组:帐簿 对更多维数的数组,可以从概念上理解。
在学习程序设计语言时, 一般只要求熟练掌 握二维数组的应用,作为理解和应用多维数组 的基础。
例 Subroutine ex(a,b,C,M,N) Real a(50),b(2,3,4),C(M:N) M=M+N N=N-2
§6.3 数组在函数和子程序中的应用
§6.3.2 假定形状数组 假定形状数组只能作为虚参,其秩是明确规 定的,但其形状由实参确定。当下界指定时, 上界会根据实参自动确定。

§1 数组的说明和数组元素的引用
2011-4-11
数组的逻辑结构和存储结构(p198 (p198§2 数组的逻辑结构和存储结构(p198-200)
一、一维数组的逻辑结构和存储结构 1. 逻辑结构 一维数组是线性表的一种表现形式。 一维数组是线性表的一种表现形式。 线性表的特点： 存在唯一的一个被称做“第一个” 线性表的特点：⑴存在唯一的一个被称做“第一个” 的数据元素； 存在唯一的一个被称做“最后一个” 的数据元素；⑵存在唯一的一个被称做“最后一个”的 数据元素； 除第一个之外， 数据元素；⑶除第一个之外，表中的每个数据元素均只 有一个前驱； 除最后一个之外， 有一个前驱； ⑷除最后一个之外，表中的每个数据元素 均只有一个后继。 均只有一个后继。 一维数组的逻辑结构是按数组元素下标值由小到大排 一维数组的逻辑结构是按数组元素下标值由小到大排 列的一个线性表， 列的一个线性表，每个元素的下标值确定了该元素在表 中的位置。 中的位置。
2011-4-11
dimension c(2,2,2)，问c的元素存储顺序如何？ 的元素存储顺序如何？ ， 的元素存储顺序如何 c(1,1,1) c(2,1,1) c(1,2,1) c(2,2,1) c(1,1,2) c(2,1,2) c(1,2,2) c(2,2,2)
15
注意： 注意： 存储结构： 存储结构：一个数组在计算机内存中实际存 放的形式。 放的形式。 Fortran程序可以在一个输入 / 输出语句中通 程序可以在一个输入 输出； 过数组名对所有数组元素进行一次性的输入 / 输出； 采用这种形式时， 采用这种形式时，输入 / 输出的顺序是和存储结构 的顺序一致的。 的顺序一致的。
6
下标下界和上界必须是整型常量或整型常量表达式， ⑶ 下标下界和上界必须是整型常量或整型常量表达式， 上界≥下界 下界。 且上界 下界。

• 简单栈区（可以带递归，但不可以嵌套定义） • 复杂栈区（可以嵌套定义, pascal）
– 堆区(new, malloc)
9.5 嵌套过程语言的栈式实现
• Pascal 的过程嵌套 嵌套层次：主程序0层 ······ 采用层数计数器，每逢Proc Begin加1，遇 Proc End则减1。
• 直接外层 • 编译器需要将过程的层数记录到符号表中
2）返回函数结果：累加器、寄存器
··· a:= 3 ··· P(a); Write(a); ···
传地址 8，8 8
举例
Procedure P(x) Begin
x:=x+5; writeln(x,a); End;
传结果 8，3 8
传值 8，3 3
举例
begin
Procedure P(x,y,z) …P(a+b,a,a)
初等类型数据采用确定“字长”，数组按列存放，边界对齐。
这样，可将过程活动单元（局部数据区）直接安排在 过程目标码之后，以便运行时访问。
9.3 Fortran静态存储分配（2）
数据区
返回地址 调用程序返回地址（调用恢复地址）
寄存器保护区 保存调用程序的寄存器运行环境
形式单元 形参
简单变量 数组 临时变量
P －>S －>Q =》R －>R
Program P; var a,x…
Top
R
procedure Q(b)
SP
var i…
R
procedure R(u,v)
动
var c,d…
态
begin… R… end {R} 链
Q
begin … R… end{Q} procedure S

我的Fortran基本用法小结周日, 10/14/2007 - 21:00 — gator一、说明二、概述三、数据类型及基本输入输出四、流程控制五、循环六、数组七、函数八、文件一、说明本文多数内容是我读彭国伦《Fortran 95 程序设计》的笔记。

只读到第九章，主要是3~9章，都是最基本的用法（原书共16章）。

这里主要摘录了我看书过程中总结的一些Fortran和C不同的地方，主要是语法方面。

希望这份笔记能够给学过C但没有接触过Fortran的同学带去一些帮助。

要想得更清楚些，推荐看一下原书，觉得作者真的写得很好，很清楚；如果有C语言的基础，看完前九应该很快的，花一两天就行了。

觉得如果耐心看完本文，基本功能应该也可以顺利用起来了。

外，由于我之前没有用过Fortran，这次为了赶文档看书又看得很粗浅，大多数东西看过之后都没得及仔细想，只是按着作者的意思去理解。

所以这份笔记还处于纸上谈兵的层次。

如果有不妥的方，希望大家指正。

谢谢！文中蓝色的部分是程序代码，!后面的内容为注释。

二、概述1、名词解释Fortran=For mula Tran slator/Translation一看就知道有什么特色了：可以把接近数学语言的文本翻译成机械语言。

的确，从一开始，IBM设计的时候就是为了方便数值计算和科学数据处理。

设计强大的数组操作就是为了实现这一目标。

ortran奠定了高级语言发展的基础。

现在Fortran在科研和机械方面应用很广。

2、Fortran的主要版本及差别按其发展历史，Fortran编译器的版本其实很多。

现在在广泛使用的是Fortran 77和Fortran90。

ortran 90在Fortran 77基础上添加了不少使用的功能，并且改良了77编程的版面格式，所以编程时推荐使用90。

鉴于很多现成的程序只有77版本，有必要知道77的一些基本常识，至少保证能够看77程序。

以下是77和90的一些格式上的区别。