tem_getoptvalordef_logical Function

private function tem_getoptvalordef_logical(value, default) result(res)

returns the optional value, if present, or the default.

this convenience routine encapsulates the check for an optional argument.

Arguments

Type IntentOptional Attributes Name
logical, optional :: value

the optional value to check for

logical :: default

the default to use when the optional value is not present.

Return Value logical

the result