--Bytes (yeah, I know, the name of the type was a bit of a give-away :-)

--type Byte = Char

defaultByte :: Byte
defaultByte            = 0
defaultByte :: Byte
defaultByte            = 0
defaultByte            = 0