why did i think s was succ

2023-11-30 08:38:43 -07:00
parent 04c55a9968
commit 0c06550189
1 changed files with 1 additions and 1 deletions
--- a/src/Core/Examples.hs
+++ b/src/Core/Examples.hs
@@ -117,7 +117,7 @@ corePrelude = Module (Just ("Prelude", [])) $
        id x = x;
        k x y = x;
        k1 x y = y;
-        succ f g x = f x (g x);
+        s f g x = f x (g x);
        compose f g x = f (g x);
        twice f x = f (f x);
        fst p = casePair# p k;