PRESENT ( A )

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.