Fortran中的一维数组
数组是一组类型完全相同、且用单个名字来引用的变量或常量。
1) 数组声明
在声明数组大小时,应使用参数来声明,以保证程序后续易修改。
- 一维数组:长度与数组中个数相同,使用
( )
可以访问具体数值。声明语句如:
INTEGER,DIMENSION(10)::number ! 定义长度为10的整数型数组number,同理可换成其它类型
- 常量数组是指完全由常量组成的数组,可以通过数组构造器来定义。数组构造器的形式有
(/ /)
和[ ]
,以下两个数组是等效的:
(/ 1 , 2 , 3 , 4 , 5 /)
[ 1 , 2 , 3 , 4 , 5 ]
2) 数组初始化
在使用数组之前,一定要先对其初始化。
初始化方法主要有三种:
-
用赋值语句初始化;
- 元素较少的,直接赋值,如:
REAL , DIMENSION(10)::array1 array1 = [1. , 2. , 3. , 4. , 5. , 6. , 7. , 8. , 9. , 10. ]
- 元素较多,且有规律的,可结合
DO
循环语句,如:
REAL , DIMENSION(100)::array2 DO i = 1,100 array2( i ) = REAL( i ) END DO
- 数组中所有元素均为同一值,可直接赋值,如:
REAL , DIMENSION(10)::array3 array3 = 1.0 ! 所有元素均为1.0
-
使用类型声明语句初始化;
- 元素较少的,直接声明,如:
REAL , DIMENSION(