ERROR "tcfail050.hs":3 - Undefined data constructor "B"