module Char where

ord   :: Char -> Int
ord    =  fromEnum