VMS Help  —  FORTRAN  Intrinsic Procedures, TRANSFER
  TRANSFER (source, mold [,size])

  Class:  Transformational function - Generic

  Copies the bit pattern of "source" and interprets it according to
  the type and kind type parameters of "mold".

  The "source" and "mold" can be of any type; they can be scalar or
  array valued.  The "mold" provides the type characteristics (not a
  value) for the result.  The "size" must be scalar of type integer;
  it provides the number of elements for the output result.

  If "mold" is a scalar and "size" is absent, the result is a scalar.

  If "mold" is an array and "size" is absent, the result is a
  rank-one array.  Its size is the smallest that is possible to hold
  all of "source".

  If "size" is present, the result is a rank-one array of size
  "size".

  If the physical representation of the result is larger than
  "source", the result contains "source"'s bit pattern in its
  right-most bits; the left-most bits of the result are undefined.

  If the physical representation of the result is smaller than
  "source", the result contains the right-most bits of "source"'s bit
  pattern.

  Examples:

  TRANSFER (1082130432, 0.0) has the value 4.0 (on processors that
  represent the values 4.0 and 1082130432 as the string of binary
  digits 0100 0000 1000 0000 0000 0000 0000 0000).

  TRANSFER ((/2.2, 3.3, 4.4/), ((0.0, 0.0))) results in a scalar
  whose value is (2.2, 3.3).

  TRANSFER ((/2.2, 3.3, 4.4/), (/(0.0, 0.0)/)) results in a complex
  rank-one array of length 2.  Its first element is (2.2,3.3) and its
  second element has a real part with the value 4.4 and an undefined
  imaginary part.

  TRANSFER ((/2.2, 3.3, 4.4/), (/(0.0, 0.0)/), 1) results in a
  complex rank-one array having one element with the value (2.2,
  3.3).
Close Help