X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Ftinycals.ma;h=3ceba6eaa1346747ce8af3a2f3787d49b3ae4def;hb=2c4dcfe11bdf6dae33566d353701965e41541ceb;hp=7bc18926126b859973c08f6b76fb1d7868877279;hpb=9f49495f5f1e54ccacb8142043cba65ca55b7125;p=helm.git

diff --git a/helm/software/matita/tests/tinycals.ma b/helm/software/matita/tests/tinycals.ma
index 7bc189261..3ceba6eaa 100644
--- a/helm/software/matita/tests/tinycals.ma
+++ b/helm/software/matita/tests/tinycals.ma
@@ -12,15 +12,17 @@
 (*                                                                        *)
 (**************************************************************************)
 
-set "baseuri" "cic:/matita/test/tinycals".
+
 
 theorem prova: 
-  \forall A,B:Prop.
-  \forall H:A \to A \to A \to A \to A \to B.A \to B.
+  \forall A,B,C:Prop.
+  \forall H:A \to A \to C \to A \to A \to B.A \to C \to B.
 intros.
 apply H;
   [assumption 
-  |3,5:assumption;
+  |3,5:
+   [ exact H2;
+   | exact H1 ]
   |4:assumption
   |*:assumption
   ]