new semantics for 'by t'

[helm.git] / helm / software / matita / tests / decl.ma

diff --git a/helm/software/matita/tests/decl.ma b/helm/software/matita/tests/decl.ma
index 40f8d3700b0e907d8d30bc8dd78369f7c3558862..84a597fda6be9e9f16e8861e7b6f837a541caebd 100644 (file)
--- a/helm/software/matita/tests/decl.ma
+++ b/helm/software/matita/tests/decl.ma
@@ -12,7 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/tests/decl".
+
 
 include "nat/times.ma".
 include "nat/orders.ma".
@@ -125,9 +125,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 (eq_f ? ? ? ? ? H).
+conclude (S n) = (S m) by H.
              = (S p) by K.
-             = n by (sym_eq ? ? ? L)
+             = n by L
 done.
 qed.