X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fsubstitution%2Ffquq.ma;h=48503a3121dc09f566aaf31b35f5f7471b526fcc;hb=43282d3750af8831c8100c60d75c56fdfb7ff3c9;hp=0e85a6d23470688fdf98e591929e61c242c9ee5f;hpb=6c985e4e2e7846a2b9abd0c84569f21c24e9ce2f;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/substitution/fquq.ma b/matita/matita/contribs/lambdadelta/basic_2/substitution/fquq.ma index 0e85a6d23..48503a312 100644 --- a/matita/matita/contribs/lambdadelta/basic_2/substitution/fquq.ma +++ b/matita/matita/contribs/lambdadelta/basic_2/substitution/fquq.ma @@ -24,7 +24,7 @@ inductive fquq: tri_relation genv lenv term ≝ | fquq_bind_dx: ∀a,I,G,L,V,T. fquq G L (ⓑ{a,I}V.T) G (L.ⓑ{I}V) T | fquq_flat_dx: ∀I,G, L,V,T. fquq G L (ⓕ{I}V.T) G L T | fquq_drop : ∀G,L,K,T,U,e. - ⇩[e] L ≡ K → ⇧[0, e] T ≡ U → fquq G L U G K T + ⬇[e] L ≡ K → ⬆[0, e] T ≡ U → fquq G L U G K T . interpretation