42 is not 0

b2949b10 · Raphaël Cauderlier · fc36dc52 · b2949b10
Commit b2949b10 authored Jul 01, 2014 by Raphaël Cauderlier
--- a/test.sigma
+++ b/test.sigma
@@ -21,7 +21,7 @@ type Nat ::= [ iszero : Bool ;
 let 0 : Nat ::= [ iszero = ς(x : Nat) true ;
                  pred = ς(x : Nat) x.pred ].

-let 42 : Nat ::= [ iszero = ς(x : Nat) true ;
+let 42 : Nat ::= [ iszero = ς(x : Nat) false ;
                  pred = ς(x : Nat) x.pred ].

 type RomCell ::= [ get : Nat ].