Declarations

Literals and constants can be used in array declarations,

    REAL, DIMENSION(100)       :: A
    REAL, DIMENSION(10,10)     :: B
    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

Now try this question