drop commit/mustWork for parsec approach. allow mixfix constructors

2024-09-14 14:46:04 -07:00
parent 647d8d8728
commit 331d966ef3
5 changed files with 49 additions and 62 deletions
--- a/newt/oper.newt
+++ b/newt/oper.newt
@@ -38,4 +38,8 @@ data Pair : U -> U -> U where
  _,_ : {A B : U} -> A -> B -> Pair A B

 blah : Int -> Int -> Int -> Pair Int (Pair Int Int)
-blah x y z = (x , y, z)
+blah x y z = (x, y, z)
+
+curryPlus : Pair Int Int -> Int
+curryPlus (_,_ a b) = a + b
+-- curryPlus (a , b) = a + b