sig
val
uppercase_ascii : char
->
char
val
lowercase_ascii : char
->
char
end