# Char.code ;;
- : char -> int = <fun>
# Char.chr;;
- : int -> char = <fun>