X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=inline;f=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fetc%2Fssta1%2Fstatictype_6.etc;fp=matita%2Fmatita%2Fcontribs%2Flambdadelta%2Fbasic_2%2Fetc%2Fssta1%2Fstatictype_6.etc;h=3861e34e1b6ac2e158578207702332dbd4665585;hb=ff7754f834f937bfe2384c7703cf63f552885395;hp=0000000000000000000000000000000000000000;hpb=4720368dcf18593959c6d21484f62fb5b61f3d26;p=helm.git diff --git a/matita/matita/contribs/lambdadelta/basic_2/etc/ssta1/statictype_6.etc b/matita/matita/contribs/lambdadelta/basic_2/etc/ssta1/statictype_6.etc new file mode 100644 index 000000000..3861e34e1 --- /dev/null +++ b/matita/matita/contribs/lambdadelta/basic_2/etc/ssta1/statictype_6.etc @@ -0,0 +1,19 @@ +(**************************************************************************) +(* ___ *) +(* ||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 *) +(* *) +(**************************************************************************) + +(* NOTATION FOR THE FORMAL SYSTEM λδ ****************************************) + +notation "hvbox( ⦃ term 46 G , break term 46 L ⦄ ⊢ break term 46 T1 • break [ term 46 h , break term 46 g ] break term 46 T2 )" + non associative with precedence 45 + for @{ 'StaticType $h $g $G $L $T1 $T2 }.