XL Fortran for AIX 8.1

Language Reference


Classes of Intrinsic Procedures

There are five classes of intrinsic procedures: inquiry functions, elemental procedures, system inquiry functions, transformational functions, and subroutines.

Inquiry Intrinsic Functions

The result of an inquiry function depends on the properties of its principal argument, not on the value of the argument. The value of the argument does not have to be defined.


ALLOCATED
ASSOCIATED
BIT_SIZE
DIGITS
EPSILON
HUGE
KIND
LBOUND

LEN
LOC (1)
MAXEXPONENT
MINEXPONENT
NUM_PARTHDS (1)
NUM_USRTHDS (1)
PRECISION
PRESENT

RADIX
RANGE
SHAPE
SIZE
SIZEOF(1)
TINY
UBOUND

Notes:

  1. IBM Extension.

Elemental Intrinsic Procedures

Some intrinsic functions and one intrinsic subroutine (MVBITS) are elemental. That is, they can be specified for scalar arguments, but also accept arguments that are arrays.

If all arguments are scalar, the result is a scalar.

If any argument is an array, all INTENT(OUT) and INTENT(INOUT) arguments must be arrays of the same shape, and the remaining arguments must be conformable with them.

The shape of the result is the shape of the argument with the greatest rank. The elements of the result are the same as if the function was applied individually to the corresponding elements of each argument.


ABS
ACHAR
ACOS
ACOSD (1)
ADJUSTL
ADJUSTR
AIMAG
AINT
ANINT
ASIN
ASIND (1)
ATAN
ATAND (1)
ATAN2
ATAN2D (1)
BTEST
CEILING
CHAR
CMPLX
CONJG
COS
COSD (1)
COSH
CVMGx (1)
DBLE
DCMPLX (1)
DIM
DPROD
ERF (1)
ERFC (1)
EXP

EXPONENT
FLOOR
FRACTION
GAMMA (1)
HFIX (1)
IACHAR
IAND(I,J)
IBCLR
IBITS
IBSET
ICHAR
IEOR
ILEN (1)
INDEX
INT
INT2(1)
IOR
ISHFT
ISHFTC
LEADZ (1)
LEN_TRIM
LGAMMA (1)
LGE
LGT
LLE
LLT
LOG
LOG10
LOGICAL
LSHIFT (1)
MAX

MERGE
MIN
MOD
MODULO
MVBITS
NEAREST
NINT
NOT
QCMPLX (1)
QEXT (1)
REAL
RRSPACING
RSHIFT
SCALE
SCAN
SET_EXPONENT
SIGN
SIN
SIND (1)
SINH
SPACING
SQRT
TAN
TAND (1)
TANH
VERIFY

Notes:

  1. IBM Extension.

+-------------------------------IBM Extension--------------------------------+

+-------------------------------IBM Extension--------------------------------+

System Inquiry Intrinsic Functions

+----------------------------End of IBM Extension----------------------------+

The system inquiry functions may be used in restricted expressions. They cannot be used in initialization expressions, nor can they be passed as actual arguments.

NUMBER_OF_PROCESSORS
PROCESSORS_SHAPE

+----------------------------End of IBM Extension----------------------------+

Transformational Intrinsic Functions

All other intrinsic functions are classified as transformational functions. They generally accept array arguments and return array results that depend on the values of elements in the argument arrays.


ALL
ANY
COUNT
CSHIFT
DOT_PRODUCT
EOSHIFT
MATMUL
MAXLOC

MAXVAL
MINLOC
MINVAL
NULL(1)
PACK
PRODUCT
REPEAT
RESHAPE

SELECTED_INT_KIND
SELECTED_REAL_KIND
SPREAD
SUM
TRANSFER
TRANSPOSE
TRIM
UNPACK

Notes:

  1. Fortran 95.

For background information on arrays, see Chapter 4, Array Concepts.

Intrinsic Subroutines

Some intrinsic procedures are subroutines. They perform a variety of tasks.


ABORT (1)
CPU_TIME (2)
DATE_AND_TIME
GETENV (1)

MVBITS
RANDOM_NUMBER
RANDOM_SEED
SIGNAL (1)

SRAND (1)
SYSTEM (1)
SYSTEM_CLOCK

Notes:

  1. IBM Extension.

  2. Fortran 95.


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]