X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fmatita%2Ftests%2Fcoercions_open.ma;h=69723aa89686913a6496ceceb8ef42020e732102;hb=56566861dd6e1dcb183dd1fa6e5dac758555ca48;hp=d0d8caedbfe0d415d79c496c2b3b3e2e8492a932;hpb=9e02cc019ec9d8e5d3223e36e6b0be9f6411e0a5;p=helm.git diff --git a/helm/software/matita/tests/coercions_open.ma b/helm/software/matita/tests/coercions_open.ma index d0d8caedb..69723aa89 100644 --- a/helm/software/matita/tests/coercions_open.ma +++ b/helm/software/matita/tests/coercions_open.ma @@ -12,7 +12,7 @@ (* *) (**************************************************************************) -set "baseuri" "cic:/matita/test/". + include "logic/equality.ma". include "nat/nat.ma". @@ -27,12 +27,12 @@ axiom eatB : ∀n. B n -> A O. axiom jmcBA : ∀n,m.∀p:A n = B m.B m -> A n. axiom jmcAB : ∀n,m.∀p:A n = B m.A n -> B m. -coercion cic:/matita/test/jmcAB.con. -coercion cic:/matita/test/jmcBA.con. +coercion cic:/matita/tests/coercions_open/jmcAB.con. +coercion cic:/matita/tests/coercions_open/jmcBA.con. axiom daemon : ∀x,y:A O.x = y. alias num (instance 0) = "natural number". lemma xx : ∀b:B 2.∀a:A 1.eatA ? b = eatB ? a. intros; [3,5,7,9: apply AB|1: apply daemon];skip. -qed. \ No newline at end of file +qed.