Array Constructors

Used to give arrays or sections of arrays specific values. For example,

    IMPLICIT NONE
    INTEGER                        :: i
    INTEGER, DIMENSION(10)         :: ints
    CHARACTER(len=5), DIMENSION(3) :: colours
    REAL, DIMENSION(4)             :: heights
    heights = (/5.10, 5.6, 4.0, 3.6/)
    colours = (/'RED  ','GREEN','BLUE '/)
    ! note padding so strings are 5 chars
    ints    = (/ 100, (i, i=1,8), 100 /)
     ...

• constructors and array sections must conform.
• must be 1D.
• for higher rank arrays use RESHAPE intrinsic.
• (i, i=1,8) is an implied DO and is 1,2,..,8, it is possible to specify a stride.

For more information, click here

Now try this question