uplo_is_valid Function

private pure function uplo_is_valid(uplo)

Checks whether the given uplo parameter is valid.

Arguments

Type	Intent	Optional	Attributes		Name
character(len=1),	intent(in)			::	uplo	uplo character to check

Return Value logical