SPREAD intrinsic function
Standard: F77 F90 F95 F2003
  Example Program
<Syntax>
SPREAD(ARRAY,DIM,NCOPIES)

ARRAY : scalar or array of any type and rank N
DIM : Scalar Integer in the rank 1 to N+1
NCOPIES : Scalar Integer

The rank N of ARRAY must be less than 7.
<Semantics>
Returns an array of rank N+1, with the same type as ARRAY. The new dimension is added as dimension DIM, and its extent is NCOPIES. If NCOPIES is less than zero it is treated as zero.

Each slice of the result through the new dimension DIM has the same value as ARRAY.
<Related>
DIMENSION attribute, RESHAPE intrinsic function, SHAPE intrinsic function, SIZE intrinsic function