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 的二维数组。一般来说,为了与实际数学运算中的理解保持一致,建议采用正整数来定义数组更加方便。