SPREAD (The GNU Fortran Compiler)

### 8.270 `SPREAD` — Add a dimension to an array ¶

Synopsis:

  `RESULT = SPREAD(SOURCE, DIM, NCOPIES)`

Description:

  Replicates a SOURCE array NCOPIES times along a specified dimension DIM.

Class:

  Transformational function

Arguments:

  SOURCE | Shall be a scalar or an array of any type and a rank less than seven.
  DIM | Shall be a scalar of type `INTEGER` with a value in the range from 1 to n+1, where n equals the rank of SOURCE.
  NCOPIES | Shall be a scalar of type `INTEGER`.

Return value:

  The result is an array of the same type as SOURCE and has rank n+1 where n equals the rank of SOURCE.

Example:

      PROGRAM test_spread
        INTEGER :: a = 1, b(2) = (/ 1, 2 /)
        WRITE(*,*) SPREAD(A, 1, 2)            ! "1 1"
        WRITE(*,*) SPREAD(B, 1, 2)            ! "1 1 2 2"
      END PROGRAM

Standard:

  Fortran 90 and later

See also:

  `UNPACK` — Unpack an array of rank one into an array