X-Git-Url: http://matita.cs.unibo.it/gitweb/?p=helm.git;a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground%2Farith%2Fnat.ma;h=d80d24f83057e852cd4ef54763e5cc95fb7dd693;hp=80a2aa200e64500e4c5a3b1f039a1832e434a748;hb=19b0a814861157ba05f23877d5cd94059f52c2e8;hpb=21de0d35017656c5a55528390b54b0b2ae395b44 diff --git a/matita/matita/contribs/lambdadelta/ground/arith/nat.ma b/matita/matita/contribs/lambdadelta/ground/arith/nat.ma index 80a2aa200..d80d24f83 100644 --- a/matita/matita/contribs/lambdadelta/ground/arith/nat.ma +++ b/matita/matita/contribs/lambdadelta/ground/arith/nat.ma @@ -38,6 +38,7 @@ qed-. (* Basic constructions ******************************************************) +(*** eq_nat_dec *) lemma eq_nat_dec (n1,n2:nat): Decidable (n1 = n2). * [| #p1 ] * [2,4: #p2 ] [1,4: @or_intror #H destruct