module Char where

chr   :: Int -> Char
chr    =  toEnum