msyds/rlp
1
0
Fork 0
Code Issues 4 Pull Requests Actions Packages Projects Releases 2 Wiki Activity

ragh!

Browse Source
This commit is contained in:
crumbtoo
2023-11-10 17:38:17 -07:00
parent 0a9e4230ee
commit 8ce258b9de
4 changed files with 90 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/Core.hs
View File

@@ -121,6 +121,6 @@ corePrelude = Program
, ScDef "K1" ["x", "y"] (Var "y")
, ScDef "S" ["f", "g", "x"] (Var "f" :$ Var "x" :$ (Var "g" :$ Var "x"))
, ScDef "compose" ["f", "g", "x"] (Var "f" :$ (Var "g" :$ Var "x"))
, ScDef "twice" ["f", "g", "x"] (Var "f" :$ (Var "g" :$ Var "x"))
, ScDef "twice" ["f", "x"] (Var "f" :$ (Var "f" :$ Var "x"))
]