]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/static_2/s_transition/fquq_weight.ma
update in ground_2, static_2, basic_2, apps_2, alpha_1
[helm.git] / matita / matita / contribs / lambdadelta / static_2 / s_transition / fquq_weight.ma
index 3aab7facead4414bcb8c8c633d392b787cfd9ce3..605a539055e572da22cdfca24088447f34278d50 100644 (file)
@@ -19,8 +19,8 @@ include "static_2/s_transition/fquq.ma".
 
 (* Forward lemmas with weight for closures **********************************)
 
-lemma fquq_fwd_fw: â\88\80b,G1,G2,L1,L2,T1,T2. â¦\83G1,L1,T1â¦\84 â¬\82⸮[b] â¦\83G2,L2,T2â¦\84 →
-                   ♯{G2,L2,T2} ≤ ♯{G1,L1,T1}.
+lemma fquq_fwd_fw: â\88\80b,G1,G2,L1,L2,T1,T2. â\9dªG1,L1,T1â\9d« â¬\82⸮[b] â\9dªG2,L2,T2â\9d« →
+                   ♯❨G2,L2,T2❩ ≤ ♯❨G1,L1,T1❩.
 #b #G1 #G2 #L1 #L2 #T1 #T2 #H elim H -H [2: * ]
 /3 width=2 by fqu_fwd_fw, lt_to_le/
 qed-.