]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/tests/applys.ma
changelog to -rc-1
[helm.git] / matita / tests / applys.ma
index c929e5be5edf0dbcdd43c83f81acfdaaeb025dca..a265946132ef64cfbbcc5a04c143e3b079105d75 100644 (file)
@@ -12,7 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/test/applys".
+set "baseuri" "cic:/matita/tests/applys".
 
 include "nat/div_and_mod.ma".
 include "nat/factorial.ma".
@@ -30,10 +30,10 @@ qed.
 theorem prova2 :
  \forall n. S n \divides (S n)!.
 intros.
-(* o fare una List.rev quando si fa la make_passives... la tira su, 
-   ma tardi....
+(* 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.