logical

Date:: 10-12-2011

NAME

LOGICAL - Converts between kinds of logical variables

SYNOPSIS

LOGICAL ([L=]l [,[KIND=]kind])

IMPLEMENTATION

Cray Linux Environment (CLE)

STANDARDS

Fortran

DESCRIPTION

The LOGICAL intrinsic function converts between kinds of logical variables. It accepts the following arguments:

l: Must be of type logical
kind: Must be a scalar integer initialization expression.

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

RETURN VALUES

The result type is logical. If kind is present, the kind type parameter is that specified by kind; otherwise, the kind type parameter is that of default logical. The value is that of l.

EXAMPLES

LOGICAL(L.OR..NOT.L) yields TRUE and is of type default logical, regardless of the kind type parameter of the logical variable L.