add illustration samples

2022-07-22 15:00:53 +01:00
parent 0a28574514
commit 250d86bafa
5 changed files with 58 additions and 0 deletions
@@ -0,0 +1,10 @@
+-- In Haskell, patterns are used to define function overloads.
+-- This is a very "static" case.
+
+data Food = Pasta | Pizza | Chips
+
+isEqualFood :: Food -> Food -> Bool
+isEqualFood Pasta Pasta = True
+isEqualFood Pizza Pizza = True
+isEqualFood Chips Chips = True
+isEqualFood _ _ = False