module Char where

isLatin1	:: Char -> Bool
isLatin1 c  	=  c < '\xFF'