Pattern Matching, Rekursion

• Programmieren Sie das logische Oder: 1 P

  oder :: Bool -> Bool -> Bool
  oder x y = case x of ...
  

• Für den Datentyp data N = Z | S N
  implementieren Sie den Test auf Gleichheit 2 P

  eq :: N -> N -> Bool
  eq x y = case x of ...