Initialization of Array Elements
1. Initializing arrays with assignment statements
REAL, DIMENSION(10):: array1
DO i = 1, 10
array(i) = REAL(i)
END DO
REAL, DIMENSION(10) :: array1
array1 = (/ 1., 2., 3., 4., 5., 6., 7., 8., 9., 10. /)
! "(/" and"/)" are array constructors.
REAL, DIMENSION(10) :: array1
array1 = 0
2. Initializing arrays in type declariation statements
INTEGER, DIMENSION(5) :: array2 = (/ 1, 2, 3, 4, 5 /)
INTEGER, DIMENSION(1000) :: array2 = (/(i, i = 1, 1000)/)
! implied DO loop
REAL, DIMENSION(100) :: array2 = 1.0
3. Initializing arrays with READ statements
'Programming > Fortran' 카테고리의 다른 글
| Error Handling in Subroutines (0) | 2008.12.03 |
|---|---|
| Nested implied DO loops (0) | 2008.12.03 |
| REWIND Statement (0) | 2008.11.24 |
| OPEN Statement (0) | 2008.11.24 |
| Formatted WRITE Statement (0) | 2008.11.24 |