]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/dynamic/nta_fsb.ma
made executable again
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / dynamic / nta_fsb.ma
index f3ae362566b35a48cf9ae0bdbcb1fc643ea4916e..14a4336e9ce32ca57da66475fc61a5f611c83d49 100644 (file)
@@ -24,9 +24,9 @@ include "basic_2/dynamic/nta.ma".
 (* Basic_1: uses: ty3_sn3 *)
 (* Basic_2A1: uses: nta_fwd_csn *)
 theorem nta_fwd_fsb (h) (a) (G) (L):
-        â\88\80T,U. â\9dªG,Lâ\9d« ⊢ T :[h,a] U →
-        ∧∧ ≥[h] 𝐒❪G,L,T❫ & ≥[h] 𝐒❪G,L,U❫.
+        â\88\80T,U. â\9d¨G,Lâ\9d© ⊢ T :[h,a] U →
+        ∧∧ ≥𝐒 ❨G,L,T❩ & ≥𝐒 ❨G,L,U❩.
 #h #a #G #L #T #U #H
 elim (cnv_inv_cast … H) #X #HU #HT #_ #_ -X
-/3 width=2 by cnv_fwd_fsb, conj/
+/3 width=3 by cnv_fwd_fsb, conj/
 qed-.