to_upper Subroutine

public pure elemental subroutine to_upper(chr)

converts a character to upper case

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(inout)			::	chr