upper Function

public pure function upper(chr) result(res)

returns an upper case character

Arguments

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

Return Value character(len=:), allocatable