diff options
Diffstat (limited to 'test-suite/output/ZSyntax.v')
| -rw-r--r-- | test-suite/output/ZSyntax.v | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/test-suite/output/ZSyntax.v b/test-suite/output/ZSyntax.v index 0f5092c416..531d1afa76 100644 --- a/test-suite/output/ZSyntax.v +++ b/test-suite/output/ZSyntax.v @@ -1,3 +1,17 @@ Require ZArith. Check `32`. Check [f:nat->Z]`(f O) + 0`. +Check [x:positive]`(POS (xO x))`. +Check [x:positive]`(POS x)+1`. +Check [x:positive]`(POS x)`. +Check [x:positive]`(NEG (xO x))`. +Check [x:positive]`(POS (xO x))+0`. +Check [x:positive]`(Zopp (POS (xO x)))`. +Check [x:positive]`(Zopp (POS (xO x)))+0`. +Check `(inject_nat O)+1`. +Check (Zplus `0` (inject_nat (plus O O))). +Check `(inject_nat O)=0`. + +(* Submitted by Pierre Casteran *) +Require Arith. +Check (Zplus `0` (inject_nat (789))). |