]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/matita/tests/decl.ma
New function map_hash.
[helm.git] / helm / software / matita / tests / decl.ma
index 84a597fda6be9e9f16e8861e7b6f837a541caebd..569a2f8ffa12cf96d24d095c7062c294b26f7ec0 100644 (file)
@@ -138,9 +138,9 @@ assume p:nat.
 suppose (n=m) (H).
 suppose (S m = S p) (K).
 suppose (n = S p) (L).
-conclude (S n) = (S m) by _.
-             = (S p) by _.
-             = n by _
+conclude (S n) = (S m).
+             = (S p).
+             = n
 done.
 qed.