fortran中的数组

《fortran中的数组》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第9章Fortran中的数组数组是Fortran语言中功能最为强大、运用最为灵活的一种数据结构。数组（ARRAY）在科学和工程计算中通常用来表示矩阵和向量。同一般的变量声明相比，数组能够同时保存多个数据。它是一种使用大规模数据的方法。配合Fortran语言中的数组操作，可用于对大量不同的数据进行处理。在存储结构上，数组占用一片连续的存储单元。程序中通过数组索引来对数组元素、片断进行操作。9.1数组的定义要在程序中使用数组，需要首先在变量声明中进行数组定义。数组定义规定了数组的维数和大小，以及数组所能保存的数据类型。在程序中，通

2、过数组引用来对数组、数组元素或者数组片断进行操作。数组是类型相同、种别一致的一组变量的有序集合。它可以是整型、实型、双精度型、复型、逻辑型、字符型以及自定义类型等中的任意一种。组成数组的每一个变量被称为数组元素，并由唯一的下标来进行标识。数组定义说明了数组所能保存的数据类型、数组的维数、维的范围和数组的大小。本节主要介绍Fortran中数组定义的几种方式。9.1.1定义形式一第一种数组定义形式的语法格式如下所示。类型说明[::]数组名([下标下界：]下标上界[，…])[，…]该定义形式通过类型说明来显式声明数组的数据类型，并通

3、过下标下界和下标上界来规定数组中某一维的范围。下标下界和下标上界共同组成了维说明符。当维说明符省略下标下界时，默认所在维的下标从1开始。如下代码都是合法的数组定义。REAL::A(1:2,2:4)INTEGERB(10)9.1.2定义形式二第二种数组定义形式的语法格式如下所示。DIMENSION[::]数组名([下标下界：]下标上界[，…])[，…][类型说明[::]数组名[，…]]该定义形式通过DIMENSION语句来进行数组的定义，通过下标下界和下标上界来规定数组中某一维的范围。在第二行通过类型说明来显式声明数组的数据类型

4、。当省略类型说明时，采用默认的“I-N”规则来对数组的数据类型进行定义。如下代码合法的对数组进行了定义。DIMENSION::A(10),B(2:11)INTEGER::A9.1.3定义形式三第三种数组定义形式的语法格式如下所示。DIMENSION([下标下界：]下标上界[，…])[::]数组名[，…][类型说明[::]数组名[，…]]该定义形式通过DIMENSION语句直接说明了数组的维数和维的范围。这种形式定义的数组全部具有相同的维数和大小。如下代码表示了如何采用上述形式进行数组的定义。DIMENSION(10,4:10)

5、::A,B,NINTEGER::AREAL(8)::N9.1.4定义形式四第四种数组定义形式的语法格式如下所示。[类型说明，]DIMENSION[::]数组名([下标下界：]下标上界[，…])[，…][类型说明，]DIMENSION([下标下界：]下标上界[，…])[::]数组名[，…]该定义形式可以说是前三种定义形式的综合形式。通过在DIMENSION语句前引入类型说明来显式的说明数组的数据类型。下列代码演示了此种形式的数组定义。REAL,DIMENSION::I(10),M(10,5)INTEGER,DIMENSION(1

6、0)::A,C9.1.5数组定义的特点上述数组定义的形式中，中括弧内的部分可有可无。数组定义语句必须出现在所有可执行语句之前。除了上述基本的定义形式外，在Fortran77中可以使用COMMON语句，在Fortran90中可以用POINTER语句、ALLOCATABLE语句等对数组定义进行加强。在前面所述的四种定义形式中，定义形式因简洁直观而常见于实际使用中。此外，如下问题是在实际编程中应该注意的。在前面所述的数组定义中，I(10)、M(10,5)、A、C等称为数组说明符。在同一个说明语句中有多个数组说明符时，用逗号进行分隔。

7、数组说明符中的I、M、A、C等是数组名，其取名规则与变量相同并且不应与程序中的其他变量同名。在同一个程序单元中，一个数组名只允许定义一次，不能重复定义。例如下面的数组定义是错误的。INTEGER::A(10),A(10,20)9.2数组的引用方式数组经过定义之后，就可以在程序中使用了。在Fortran77标准中，数组只允许在输入输出语句中进行整体操作。在其他场合，只能对数组的元素通过下标索引的方式逐个进行操作。到了Fortran90标准，这一限制被大大放宽了。数组除了能够进行整体操作以外，还能对数组中的片断和数组的整体进行操作

8、。这进一步增强了Fortran语言在数值处理方面的能力。Fortran中数组的引用方式可以概括为以下几种：9.2.1引用数组元素引用数组元素的语法格式如下所示。数组名(下标，……)这种引用方式通过下标索引来对数组中的每一个元素进行操作。它是Fortran中最为传统的一种引用方