ds043.hs:8: Warning: Pattern match(es) are overlapped In a case alternative (B _ _ _ _ True False): B {e = True, f = False} -> ...