X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=helm%2Fsoftware%2Fmatita%2Fcontribs%2FLOGIC%2FTrack%2Forder.ma;h=934632cd45f1907280dd3679332a380981e64252;hb=HEAD;hp=6487433dd9b8a5972001adb02600425e6350a423;hpb=3784663281673f2549ab856d36441dfd24dcc593;p=helm.git diff --git a/helm/software/matita/contribs/LOGIC/Track/order.ma b/helm/software/matita/contribs/LOGIC/Track/order.ma index 6487433dd..934632cd4 100644 --- a/helm/software/matita/contribs/LOGIC/Track/order.ma +++ b/helm/software/matita/contribs/LOGIC/Track/order.ma @@ -12,13 +12,13 @@ (* *) (**************************************************************************) -set "baseuri" "cic:/matita/LOGIC/Track/order". + include "Insert/fun.ma". include "Track/defs.ma". (* Order properties *********************************************************) - +(* theorem track_refl: \forall P. \forall c:Formula. \exists r. Track P r (pair c c). intros; elim c; clear c; @@ -33,3 +33,4 @@ theorem track_trans: \forall P,p,q,A,B. \forall c:Formula. \exists r. Track P r (pair A B). intros; autobatch. qed. +*)