(* *)
(**************************************************************************)
+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 ****)
(* 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-.