claudio, please have a look at this

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

diff --git a/helm/software/matita/tests/applys.ma b/helm/software/matita/tests/applys.ma
index 74573177f6b812014bbc096bb6be43d0b42e035c..fa0d3699851cb60dba3441584e464c0a884e7c8f 100644 (file)
--- a/helm/software/matita/tests/applys.ma
+++ b/helm/software/matita/tests/applys.ma
@@ -12,7 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/test/".
+
 
 include "nat/div_and_mod.ma".
 include "nat/factorial.ma".
@@ -30,5 +30,10 @@ qed.
 theorem prova2 :
  \forall n. S n \divides (S n)!.
 intros.
+(* se non trova subito sym_times poi si perde! *)
+(* alternativamente si puo' abilitare la are_convertible nella
+   is_identity, ma poi va peggio nel resto (conv lunghe) *)
+letin www \def sym_times.
+clearbody www.
 applyS (witness ? ? ? (refl_eq ? ?)).
 qed.