logical(3I)

NAME
     LOGICAL - Converts between kinds of logical

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

IMPLEMENTATION
     UNICOS, UNICOS/mk, IRIX systems

     CF90, MIPSpro 7 Fortran 90

STANDARDS
     Fortran

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

     l         Must be of type logical

     kind      An integer scalar value.  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) has the value true and is of type default
     logical, regardless of the kind type parameter of the logical variable
     L.

SEE ALSO
     Intrinsic Procedures Reference Manual for the printed version of this
     man page.