diff options
Diffstat (limited to 'theories/ZArith/Znat.v')
-rw-r--r-- | theories/ZArith/Znat.v | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/theories/ZArith/Znat.v b/theories/ZArith/Znat.v index ec37c1412..5d3b20160 100644 --- a/theories/ZArith/Znat.v +++ b/theories/ZArith/Znat.v @@ -29,6 +29,11 @@ Definition neq (x y:nat) := x <> y. (** Injection and successor *) +Theorem inj_0 : Z_of_nat 0 = 0%Z. +Proof. + reflexivity. +Qed. + Theorem inj_S : forall n:nat, Z_of_nat (S n) = Zsucc (Z_of_nat n). Proof. intro y; induction y as [| n H]; |