]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/static_2/relocation/lifts_simple.ma
update in ground_2, static_2, basic_2, apps_2, alpha_1
[helm.git] / matita / matita / contribs / lambdadelta / static_2 / relocation / lifts_simple.ma
index 4a01cd1ff2cb56c7bb8b973a657f0c3a9d576062..5984132eb6129d46c70a66854624d144a660658a 100644 (file)
@@ -20,13 +20,13 @@ include "static_2/relocation/lifts.ma".
 (* Forward lemmas with simple terms *****************************************)
 
 (* Basic_2A1: includes: lift_simple_dx *)
-lemma lifts_simple_dx: â\88\80f,T1,T2. â\87§*[f] T1 â\89\98 T2 â\86\92 ð\9d\90\92â¦\83T1â¦\84 â\86\92 ð\9d\90\92â¦\83T2â¦\84.
+lemma lifts_simple_dx: â\88\80f,T1,T2. â\87§*[f] T1 â\89\98 T2 â\86\92 ð\9d\90\92â\9dªT1â\9d« â\86\92 ð\9d\90\92â\9dªT2â\9d«.
 #f #T1 #T2 #H elim H -f -T1 -T2 //
 #f #p #I #V1 #V2 #T1 #T2 #_ #_ #_ #_ #H elim (simple_inv_bind … H)
 qed-.
 
 (* Basic_2A1: includes: lift_simple_sn *)
-lemma lifts_simple_sn: â\88\80f,T1,T2. â\87§*[f] T1 â\89\98 T2 â\86\92 ð\9d\90\92â¦\83T2â¦\84 â\86\92 ð\9d\90\92â¦\83T1â¦\84.
+lemma lifts_simple_sn: â\88\80f,T1,T2. â\87§*[f] T1 â\89\98 T2 â\86\92 ð\9d\90\92â\9dªT2â\9d« â\86\92 ð\9d\90\92â\9dªT1â\9d«.
 #f #T1 #T2 #H elim H -f -T1 -T2 //
 #f #p #I #V1 #V2 #T1 #T2 #_ #_ #_ #_ #H elim (simple_inv_bind … H)
 qed-.