Bladeren bron

Create an custom 'and' opeartor

With pattern matching
DricomDragon 5 jaren geleden
bovenliggende
commit
1e4130bab9
1 gewijzigde bestanden met toevoegingen van 4 en 0 verwijderingen
  1. 4 0
      logic.hs

+ 4 - 0
logic.hs

@@ -0,0 +1,4 @@
+myAnd b1 b2 = 
+	case (b1, b2) of
+	(True, True) -> True
+	(_, _) -> False