RosettaCodeData/Task/String-case/Icon/string-case.icon

5 lines
91 B
Plaintext

procedure main()
write(map("alphaBETA"))
write(map("alphaBETA",&lcase,&ucase))
end