Fortran 数组的定义

前面我们所介绍的有关数据类型基本上能够涵盖一般的日常使用，但是对于科研人员来说，矩阵、行列式等等才是计算过程中不可缺少的数据类型。为此，Fortran 也有了数组一样的数据类型来支持这一需求。如下所示，我们可以直接采用原有的整数型、实数型和复数型定义数组。当括号中只有一个数字时，表示是一维数组；当括号中有逗号分割的两个数字时，表示是二维数组；三维数组以此类推。二维数组可以用于表示我们所熟知的矩阵、行列式等数据类型。

integer m(10)         ! 长度为 10 的整数型数组
real x(20), y(4, 5)   ! 长度为 20 的实数型数组， 4 行 x 5 列的二维实数型数组
complex matrix(5, 5)  ! 5 行 x 5 列的二维复数型数组

 这里需要注意的是，在定义数组的时候不仅可以用正整数，也可以用负整数和 0。比如 real n(-3:5) 表示定义一个长度为 9、序号从 -3 到 5 (包括 0)的一维数组，real m(-2:1, 0:4) 表示定义一个 4 行 x 5 列、行序号从 -2 到 1、列序号从 0 到 4 的二维数组。一般来说，为了与实际数学运算中的理解保持一致，建议采用正整数来定义数组更加方便。