fcd

NAME

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

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

Cray Linux Environment (CLE)

Fortran extension

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

i: The i argument must be of type integer (kind=8) or Cray pointer and represent the word address for the pointee’s first character.
j: The j argument must be an integer (kind=8) value that represents the pointee’s character length.

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

The value returned is of type Cray pointer.

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