]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/matita/contribs/lambdadelta/apps_2/models/deq.ma
some restyling ...
[helm.git] / matita / matita / contribs / lambdadelta / apps_2 / models / deq.ma
index 5d0f2d324ef315cfaa1c3259e074bf5da94a3edc..849ad9dd43ef0e834c3846791737526bafdae80b 100644 (file)
@@ -19,7 +19,7 @@ include "static_2/syntax/genv.ma".
 (* DENOTATIONAL EQUIVALENCE  ************************************************)
 
 definition deq (M): relation4 genv lenv term term ≝
-                    λG,L,T1,T2. ∀gv,lv. lv ϵ ⟦L⟧[gv] → ⟦T1⟧[gv, lv] ≗{M} ⟦T2⟧[gv, lv].
+                    λG,L,T1,T2. ∀gv,lv. lv ϵ ⟦L⟧[gv] → ⟦T1⟧[gv,lv] ≗{M} ⟦T2⟧[gv,lv].
 
 interpretation "denotational equivalence (model)"
    'RingEq M G L T1 T2 = (deq M G L T1 T2).