1 files changed, 4 insertions, 4 deletions
diff --git a/Alpha.hs b/Alpha.hs
index f1c5bdd..47e7b57 100644
--- a/Alpha.hs
+++ b/Alpha.hs
@@ -164,12 +164,12 @@ a +> b = a Prelude.>>= b
 infixl 1 +>
 
 -- | If-then-else. wutcol
-(?:) :: Bool -> (Bool -> p, Bool -> p) -> p
-a ?: (f, g) = if a then f a else g a
+(?:) :: Bool -> (p, p) -> p
+a ?: (b, c) = if a then b else c
 
 -- | Inverted if-then-else. wutdot
-(?.) :: Bool -> (Bool -> p, Bool -> p) -> p
-a ?. (g, f) = if a then f a else g a
+(?.) :: Bool -> (p, p) -> p
+a ?. (b, c) = if a then c else b
 
 -- | Positive assertion. wutgar
 (?>) :: Bool -> (Bool -> Text -> a) -> Text -> a