update in ground_2, static_2, basic_2

[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / rt_computation / jsx.ma

diff --git a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/jsx.ma b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/jsx.ma
index 9521a9b27d932915d530e24ceed3928fdf979940..685ff2a369facfe57b60b680c1a4adde330634ec 100644 (file)
--- a/matita/matita/contribs/lambdadelta/basic_2/rt_computation/jsx.ma
+++ b/matita/matita/contribs/lambdadelta/basic_2/rt_computation/jsx.ma
@@ -12,6 +12,7 @@
 (*                                                                        *)
 (**************************************************************************)
 
+include "ground_2/xoa/ex_4_3.ma".
 include "basic_2/notation/relations/topredtysnstrong_4.ma".
 include "basic_2/rt_computation/rsx.ma".
 
@@ -72,7 +73,7 @@ lemma jsx_inv_pair_sn (h) (G):
        | ∃∃K2. G ⊢ K1 ⊒[h] K2 & G ⊢ ⬈*[h,V] 𝐒⦃K2⦄ & L2 = K2.ⓧ.
 #h #G #I #K1 #L2 #V #H elim (jsx_inv_bind_sn … H) -H *
 [ /3 width=3 by ex2_intro, or_introl/
-| #J #K2 #X #HK12 #HX #H1 #H2 destruct /3 width=4 by ex3_intro, or_intror/ 
+| #J #K2 #X #HK12 #HX #H1 #H2 destruct /3 width=4 by ex3_intro, or_intror/
 ]
 qed-.