]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/basic_2/substitution/fleq_fleq.ma
- advances in the theory of cofrees
[helm.git] / matita / matita / contribs / lambdadelta / basic_2 / substitution / fleq_fleq.ma
index 36885f0e15c8ced48404e0fed64fee78e8bc3e8b..e8d5dac02024eb93c6efa890f913e9d2ec47281f 100644 (file)
@@ -26,9 +26,9 @@ theorem fleq_trans: ∀d. tri_transitive … (fleq d).
 qed-.
 
 theorem fleq_canc_sn: ∀G,G1,G2,L,L1,L2,T,T1,T2,d.
-                      â¦\83G, L, Tâ¦\84 â\8b\95[d] â¦\83G1, L1, T1â¦\84â\86\92 â¦\83G, L, Tâ¦\84 â\8b\95[d] â¦\83G2, L2, T2â¦\84 â\86\92 â¦\83G1, L1, T1â¦\84 â\8b\95[d] ⦃G2, L2, T2⦄.
+                      â¦\83G, L, Tâ¦\84 â\89¡[d] â¦\83G1, L1, T1â¦\84â\86\92 â¦\83G, L, Tâ¦\84 â\89¡[d] â¦\83G2, L2, T2â¦\84 â\86\92 â¦\83G1, L1, T1â¦\84 â\89¡[d] ⦃G2, L2, T2⦄.
 /3 width=5 by fleq_trans, fleq_sym/ qed-.
 
 theorem fleq_canc_dx: ∀G1,G2,G,L1,L2,L,T1,T2,T,d.
-                      â¦\83G1, L1, T1â¦\84 â\8b\95[d] â¦\83G, L, Tâ¦\84 â\86\92 â¦\83G2, L2, T2â¦\84 â\8b\95[d] â¦\83G, L, Tâ¦\84 â\86\92 â¦\83G1, L1, T1â¦\84 â\8b\95[d] ⦃G2, L2, T2⦄.
+                      â¦\83G1, L1, T1â¦\84 â\89¡[d] â¦\83G, L, Tâ¦\84 â\86\92 â¦\83G2, L2, T2â¦\84 â\89¡[d] â¦\83G, L, Tâ¦\84 â\86\92 â¦\83G1, L1, T1â¦\84 â\89¡[d] ⦃G2, L2, T2⦄.
 /3 width=5 by fleq_trans, fleq_sym/ qed-.