X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground_2%2Finsert_eq%2Finsert_eq_0.ma;fp=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fground_2%2Finsert_eq%2Finsert_eq_0.ma;h=6a3788e7d10eab110a753ae19a9c7a620c4879ad;hb=d9a1ff8259a7882caa0ffd27282838c00a34cab5;hp=0000000000000000000000000000000000000000;hpb=48c011f52853dd106dbf9cbbd1b9da61277fba3b;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/ground_2/insert_eq/insert_eq_0.ma b/matita/matita/contribs/lambdadelta/ground_2/insert_eq/insert_eq_0.ma new file mode 100644 index 000000000..6a3788e7d --- /dev/null +++ b/matita/matita/contribs/lambdadelta/ground_2/insert_eq/insert_eq_0.ma @@ -0,0 +1,20 @@ +(**************************************************************************) +(* ___ *) +(* ||M|| *) +(* ||A|| A project by Andrea Asperti *) +(* ||T|| *) +(* ||I|| Developers: *) +(* ||T|| The HELM team. *) +(* ||A|| http://helm.cs.unibo.it *) +(* \ / *) +(* \ / This file is distributed under the terms of the *) +(* v GNU General Public License Version 2 *) +(* *) +(**************************************************************************) + +include "basics/relations.ma". + +(* GENERATED LIBRARY ********************************************************) + +lemma insert_eq_0: ∀A,a. ∀Q1,Q2:predicate A. (∀a0. Q1 a0 → a = a0 → Q2 a0) → Q1 a → Q2 a. +/2 width=1 by/ qed-.