Using Fortran Intrinsic Functions in Expressions

Prism supports the use of a subset of Fortran intrinsic functions in writing expressions; the intrinsics work for all languages that Prism supports, except as noted below.

The intrinsics, along with the supported arguments, are

• ALL(logical array) - Determines whether all elements are true in a logical array. Works for Fortran only.

• ANY(logical array) - Determines whether any elements are true in a logical array. Works for Fortran only.

• CMPLX(numeric-arg, numeric-arg) - Converts the arguments to a complex number. If the intrinsic is applied to Fortran variables, the second argument must not be of type complex or double (double-precision complex).

• COUNT(logical array) - Counts the number of true elements in a logical array. Works for Fortran only.

• SIZE(array) - Counts the total number of elements in the array.

• ILEN(I) - Returns one less than the length, in bits, of the two's-complement representation of an integer. If I is nonnegative, ILEN(I) has the value log2(I + 1); if I is negative, ILEN(I) has the value log2(-I).

• IMAG(complex number) - Returns the imaginary part of a complex number. Works for Fortran only.

• MAXVAL(array) - Computes the maximum value of all elements of a numeric array.

• MINVAL(array) - Computes the minimum value of all elements of a numeric array.

• PRODUCT(array) - Computes the product of all elements of a numeric array.

• RANK(scalar or array) - Returns the rank of the array or scalar.

• REAL(numeric argument) - Converts an argument to real type. Works for Fortran only.

• SUM(array) - Computes the sum of all elements of a numeric array.

The intrinsics can be either upper- or lowercase.