func main()
	var c: char :: cui@inputChar()
	var d: dict<char, []char> :: #dict<char, []char>
	do d.add('Z', "1st")
	do d.add('B', "2nd")
	do d.add('S', "3rd")
	do d.add('E', "4th")
	do d.add('D', "Alpha")
	var ans: []char :: d.get(c, &)
	do cui@print("\{ans}\n")
end func