{-# #-} {- -} -- " " ' ' '!' '"' '$' '%' '/' '(' ')' '[' ']' '+' '-' '*' '=' '/' '^' '.' ',' ':' ';' '<' '>' '|' '@' ' ' .. && :: < > + - * / % ^ = | @ ~ ! $ case class data default deriving do else if import in infix infixl infixr instance let module newtype of then type where _ as qualified hiding Addr Bool Bounded Char Double Either Enum Eq FilePath Float Floating Fractional Functor IO IOError IOResult Int Integer Integral Ix Maybe Monad Num Ord Ordering Ratio Rational Read ReadS Real RealFloat RealFrac Show ShowS String : EQ False GT Just LT Left Nothing Right True quot rem div mod elem notElem seq