Literals and constants can be used in array declarations,

REAL, DIMENSION(100) :: R REAL, DIMENSION(1:10,1:10) :: S REAL :: T(10,10) REAL, DIMENSION(-10:-1) :: X INTEGER, PARAMETER :: lda = 5 REAL, DIMENSION(0:lda-1) :: Y REAL, DIMENSION(1+lda*lda,10) :: Z

- default lower bound is 1,
- bounds can begin and end anywhere,
- arrays can be zero-sized (if
`lda = 0`),

*For more information, click here *

Wed May 28 23:37:18 BST 1997