]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/apps_2/models/veq.ma
made executable again
[helm.git] / matita / matita / contribs / lambdadelta / apps_2 / models / veq.ma
index 4d3d16c1e2ca2be618b74b76c9cca1991c93d48a..044866007346ddad0bc03a5d052d8e3aa381b316 100644 (file)
@@ -79,11 +79,11 @@ elim (lt_or_eq_or_gt j i) #Hij destruct
 ]
 qed-.
 
-(* Properies with term interpretation ***************************************) 
+(* Properies with term interpretation ***************************************)
 
 lemma ti_comp (M): is_model M →
                    ∀T,gv1,gv2. gv1 ≗ gv2 → ∀lv1,lv2. lv1 ≗ lv2 →
-                   ⟦T⟧[gv1, lv1] ≗{M} ⟦T⟧[gv2, lv2].
+                   ⟦T⟧[gv1,lv1] ≗{M} ⟦T⟧[gv2,lv2].
 #M #HM #T elim T -T * [||| #p * | * ]
 [ /4 width=5 by seq_trans, seq_sym, ms/
 | /4 width=5 by seq_sym, ml, mq/