fcd(3I)

NAME
     FCD - Constructs a Cray character pointer in Fortran character
     Descriptor (FCD) format

SYNOPSIS
     FCD ([I=]i, [J=]j)

IMPLEMENTATION
     UNICOS and UNICOS/mk systems

     IRIX systems (DEFERRED IMPLEMENTATION)

STANDARDS
     CF90 and MIPSpro 7 Fortran 90 compiler extension to Fortran 90

DESCRIPTION
     The FCD intrinsic function constructs a Cray character pointer in FCD
     format.  This function accepts the following arguments:

     i    Must be of type integer or Cray pointer and represent the word
          address for the pointee's first character.  If i is of type
          integer, it must be of KIND=8 on UNICOS and UNICOS/mk systems or
          of KIND=4 on IRIX systems.

     j    Must be an integer value that represents the pointee's character
          length.  Must be of KIND=8 on UNICOS and UNICOS/mk systems or of
          KIND=4 on IRIX systems.

     FCD is an elemental function.  The name of this intrinsic cannot be
     passed as an argument.

RETURN VALUES
     The value returned is of type Cray pointer.

EXAMPLES
     As the following example shows, you can add an offset even if the Cray
     character pointee does not start on a word boundary.

          CPTR = FCD(IADRS, ILEN) + IOFFSET

SEE ALSO
     CLOC(3I)

     Intrinsic Procedures Reference Manual, publication SR-2138, for the
     printed version of this man page.