TRANSFER — Transfer bit patterns

TRANSFER()

Interprets the bitwise representation of SOURCE in memory as if it is the representation of a variable or array of the same type and type parameters as MOLD.

Parameters

  • SOURCE – Shall be a scalar or an array of any type.

  • MOLD – Shall be a scalar or an array of any type.

  • SIZE – (Optional) shall be a scalar of type INTEGER.

Returns

The result has the same type as MOLD, with the bit level representation of SOURCE. If SIZE is present, the result is a one-dimensional array of length SIZE. If SIZE is absent but MOLD is an array (of any size or shape), the result is a one- dimensional array of the minimum length needed to contain the entirety of the bitwise representation of SOURCE. If SIZE is absent and MOLD is a scalar, the result is a scalar.

Standard:

Fortran 90 and later

Class:

Transformational function

Syntax:

RESULT = TRANSFER(SOURCE, MOLD[, SIZE])

Example:

PROGRAM test_transfer
  integer :: x = 2143289344
  print *, transfer(x, 1.0)    ! prints "NaN" on i686
END PROGRAM