PRESENT intrinsic function
Standard: F77 F90 F95 F2003 F2008   Example Program


A : the name of an optional dummy argument, this may have any type or rank, and may even be a procedure;

Result : Logical, default kind.


The result is true if and only if the dummy argument is present. Note that presence of a dummy argument is transitive: if it is not present, it may be passed as an actual argument to another optional dummy argument, and that dummy argument will also not be present.

This is an enquiry function; the dummy argument need not be defined, associated or allocated.

OPTIONAL attribute