Declarations

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

Now try this question