X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Frt_computation%2Flfpxs_lfpxs.ma;h=09d004b2c03f24a37ba4e0e06638751f56306401;hb=fed8c1a61273b0eb4a719fda70e2b5dd31933c8a;hp=e2a5ee4d99cb83ab7094b434ee9a30d24b9deb87;hpb=a04fa03fcea0493e89b725960146cc0c06539583;p=helm.git

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lfpxs_lfpxs.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lfpxs_lfpxs.ma
index e2a5ee4d9..09d004b2c 100644
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lfpxs_lfpxs.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/lfpxs_lfpxs.ma
@@ -12,6 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
+include "basic_2/i_static/tc_lfxs_tc_lfxs.ma".
 include "basic_2/rt_computation/lfpxs.ma".
 
 (* UNCOUNTED PARALLEL RT-COMPUTATION FOR LOCAL ENV.S ON REFERRED ENTRIES ****)
@@ -20,5 +21,4 @@ include "basic_2/rt_computation/lfpxs.ma".
 
 (* Basic_2A1: uses: lpxs_trans *)
 theorem lfpxs_trans: ∀h,G,T. Transitive … (lfpxs h G T).
-#h #G #T #L1 #L #HL1 #L2 #HL2 @(trans_TC … HL1 HL2) (**) (* auto fails *) 
-qed-.
+/2 width=3 by tc_lfxs_trans/ qed-.