X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fbinaries%2Fmatex%2Ftest%2Flegacy_1.sty;h=b240c44b170d4eb155742e459da9ae5432dee5f9;hb=bedea63520c165e9445c15b09455e349c72e48a5;hp=d33196fb2b62be5c1c398ff79fba886f2b0ebd44;hpb=348f1670b30f52db99187b2e92b45348e18ebbbe;p=helm.git diff --git a/matita/components/binaries/matex/test/legacy_1.sty b/matita/components/binaries/matex/test/legacy_1.sty index d33196fb2..b240c44b1 100644 --- a/matita/components/binaries/matex/test/legacy_1.sty +++ b/matita/components/binaries/matex/test/legacy_1.sty @@ -1,10 +1,42 @@ \NeedsTeXFormat{LaTeX2e}[1995/12/01] -\ProvidesPackage{lambdadelta_1}[2016/05/23 Notation for "cic:/matita/lambdadelta/legacy_1/"] +\ProvidesPackage{legacy_1}[2016/07/03 Notation for "cic:/matita/lambdadelta/legacy_1/"] +\RequirePackage{matex} \ExecuteOptions{} \ProcessOptions* +\let\OldSucc=\Succ + \makeatletter +\newcommand*\ld@and[1]{\setbinlink{\&}{#1}{}} +\newcommand*\ld@lex[1]{\setordlink{\exists}{#1}} +\newcommand*\ld@land[1]{\setrellink{\land}{#1}{}} +\newcommand*\ld@lor[1]{\setrellink{\lor}{#1}{}} + +\newcommand*\ld@eq[1]{\setrellink{=}{#1}{}} +\newcommand*\ld@le[1]{\setrellink{\le}{#1}{}} +\newcommand*\ld@lt[1]{\setrellink{<}{#1}{}} +\newcommand*\ld@minus[1]{\setbinlink{-}{#1}{}} +\newcommand*\ld@lnot[1]{\setoplink{\lnot}{#1}{}} +\newcommand*\ld@plus[2]{\setbinlink{+}{#1}{#2}} +\newcommand*\ld@pred[1]{\setoplink{\midcir}{#1}{}} +\newcommand*\ld@succ[2]{\setoplink{\cirmid}{#1}{#2}} + +\newcommand*\ld@list[2]{\ma@list\relax\ma@arg{#1{#2}}\relax} + +\newcommand*\LAnd[1]{\ld@list\ld@land{#1}} +\newcommand*\LOr[1]{\ld@list\ld@lor{#1}} +\newcommand*\LEx[1]{\ld@lex{#1}\ma@list\relax\ma@skip\relax{\ld@list\ld@and{#1}}} + +\newcommand*\EQ[4]{#3\ld@eq{#1}#4} +\newcommand*\LE[3]{#2\ld@le{#1}#3} +\newcommand*\LT[3]{#2\ld@lt{#1}#3} +\newcommand*\Minus[3]{#2\ld@minus{#1}#3} +\newcommand*\LNot[2]{\ld@lnot{#1}#2} +\newcommand*\Plus[3]{#2\ld@plus{#1}{}#3} +\newcommand*\Pred[2]{\ld@pred{#1}#2} +\renewcommand*\Succ[2]{\ld@succ{#1}{}#2} + \makeatother \endinput