\NeedsTeXFormat{LaTeX2e}[1995/12/01]
\ProvidesPackage{basic_1}[2016/07/03 Notation for "cic:/matita/lambdadelta/basic_1/"]
\RequirePackage{legacy_1}
\RequirePackage{ground_1}
\ExecuteOptions{}
\ProcessOptions*

\let\OldEquiv=\Equiv

\makeatletter

\newcommand*\ld@ob[1]{\mathopen{[}}
\newcommand*\ld@cb[1]{\mathopen{]}}
\newcommand*\ld@oB[1]{\mathopen{\lBrack}}
\newcommand*\ld@cB[1]{\mathopen{\rBrack}}
\newcommand*\ld@env[1]{\mathrel{\vdash}}
\newcommand*\ld@fs[1]{\mathord{.}}

\newcommand*\ld@appl[1]{\setbinlink{@}{#1}{}}
\newcommand*\ld@appls[1]{\setbinlink{\overline{@}}{#1}{}}
\newcommand*\ld@arity[2]{\setrellink{\mathsf{arity}}{#1}{#2}}
\newcommand*\ld@bind[1]{\setordlink{\mathbf{B}}{#1}{}}
\newcommand*\ld@coconverts[1]{\setrellink{\mathsf{convert}_{\mathord\oplusrhrim}^*}{#1}{}}
\newcommand*\ld@converts[1]{\setrellink{\mathsf{convert}^*}{#1}{}}
\newcommand*\ld@copremise[2]{\setoplink{\mathsf{copremise}}{#1}{#2}}
\newcommand*\ld@coweight[1]{\setoplink{\equivVvert}{#1}{}}
\newcommand*\ld@drop[2]{\setoplink{\Downarrow}{#1}{#2}}
\newcommand*\ld@drops[2]{\setoplink{\Downarrow^*}{#1}{#2}}
\newcommand*\ld@equiv[2]{\setrellink{\equiv}{#1}{#2}}
\newcommand*\ld@flat[1]{\setoplink{\mathbf{F}}{#1}{}}
\newcommand*\ld@funlift[2]{\setoplink{\uparrow}{#1}{#2}}
\newcommand*\ld@funlifts[2]{\setoplink{\uparrow^*}{#1}{#2}}
\newcommand*\ld@funv[2]{\setoplink{\mathsf{v}}{#1}{#2}}
\newcommand*\ld@funw[2]{\setoplink{\mathsf{w}}{#1}{#2}}
\newcommand*\ld@pair[2]{\setordlink{\mathbf{P}}{#1}{#2}}
\newcommand*\ld@in[1]{\setrellink{\in}{#1}{}}
\newcommand*\ld@leaf[1]{\setoplink{\star}{#1}{}}
\newcommand*\ld@length@open[1]{\setopenlink{\vert}{#1}}
\newcommand*\ld@length@close[1]{\setcloselink{\vert}{#1}}
\newcommand*\ld@lenv[1]{\setoplink{\mathsf{lenv}}{#1}{}}
\newcommand*\ld@level[1]{\setoplink{\mathsf{level}}{#1}{}}
\newcommand*\ld@lref[1]{\setoplink{\#}{#1}{}}
\newcommand*\ld@lsup[2]{\setrellink{\sqsupseteq}{#1}{#2}}
\newcommand*\ld@lsupa[2]{\setrellink{\mathord\sqsupseteq\lozenge}{#1}{#2}}
\newcommand*\ld@lsupt[2]{\setrellink{\mathord\sqsupseteq\mathord:}{#1}{#2}}
\newcommand*\ld@mksh[1]{\setordlink{\mathbf{H}}{#1}{}}
\newcommand*\ld@next[2]{\setoplink{\mathsf{next}}{#1}{#2}}
\newcommand*\ld@rcandidate[2]{\setoplink{\mathsf{r\_candidate}}{#1}{#2}}
\newcommand*\ld@rnormal[1]{\setoplink{\mathsf{r\_normal}}{#1}{}}
\newcommand*\ld@rstep[1]{\setrellink{\mathsf{r\_step}}{#1}{}}
\newcommand*\ld@rsteps[1]{\setrellink{\mathsf{r\_step^*}}{#1}{}}
\newcommand*\ld@rstrong[1]{\setoplink{\mathsf{r\_strong}}{#1}{}}
\newcommand*\ld@sametop[1]{\setrellink{\eqsim}{#1}{}}
\newcommand*\ld@shift[1]{\setordlink{.}{#1}}
\newcommand*\ld@subeq[1]{\setrellink{\subseteq}{#1}{}}
\newcommand*\ld@subst[1]{\setbinlink{/}{#1}{}}
\newcommand*\ld@substs[1]{\setbinlink{/^*}{#1}{}}
\newcommand*\ld@to[1]{\setrellink{\rightarrow}{#1}{}}
\newcommand*\ld@tstep[2]{\setrellink{\mathsf{t\_step}}{#1}{#2}}
\newcommand*\ld@tsteps[2]{\setrellink{\mathsf{t\_step^*}}{#1}{#2}}
\newcommand*\ld@type[2]{\setrellink{\mathsf{type}}{#1}{#2}}
\newcommand*\ld@valid[2]{\setoplink{\mathsf{valid}}{#1}{#2}}
\newcommand*\ld@weight[1]{\setoplink{\equalparallel}{#1}{}}

\newcommand*\ld@tuple@a[2]{\ld@oa{#1}#2\ld@ca{#1}}

\newcommand*\Appl[3]{#2\ld@appl{#1}#3}
\newcommand*\ApplS[3]{#2\ld@appls{#1}#3}
\newcommand*\Arity[5]{#3\ld@env{#1}#4\ld@arity{#1}{\ld@tuple@a{#1}{#2}}#5}
\newcommand*\AtomA[2]{\ld@leaf{#1}#2}
\newcommand*\AtomB[3]{\ld@leaf{#1}\ld@tuple@b{#1}{#2}{#3}}
\newcommand*\Bind[2]{\ld@bind{#1}\ld@tuple@a{#1}{#2}}
\newcommand*\CoConsA[3]{#2\ld@cocons{#1}#3}
\newcommand*\CoConvertSA[4]{#2\ld@env{#1}#3\ld@coconverts{#1}#4}
\newcommand*\ConsA[3]{#2\ld@cons{#1}#3}
\newcommand*\ConvertS[3]{#2\ld@converts{#1}#3}
\newcommand*\ConvertSA[4]{#2\ld@env{#1}#3\ld@converts{#1}#4}
\newcommand*\CoPremise[4]{\ld@copremise{#1}{\ld@tuple@a{#1}{#2}}#3\ld@eq{#1}#4}
\newcommand*\CoWeightA[2]{\ld@coweight{#1}\ld@tuple@a{#1}{#2}}
\newcommand*\CoWeightB[3]{\ld@coweight{#1}\ld@tuple@b{#1}{#2}{#3}}
\newcommand*\Drop[3]{\ld@drop{#1}{}#2\ld@eq{#1}#3}
\newcommand*\DropA[4]{\ld@drop{#1}{\ld@tuple@a{#1}{#2}}#3\ld@eq{#1}#4}
\newcommand*\DropB[5]{\ld@drop{#1}{\ld@tuple@b{#1}{#2}{#3}}#4\ld@eq{#1}#5}
\newcommand*\DropS[4]{\ld@drops{#1}{\ld@tuple@a{#1}{#2}}#3\ld@eq{#1}#4}
\renewcommand*\Equiv[3]{#2\ld@equiv{#1}{}#3}
\newcommand*\EquivA[4]{#3\ld@equiv{#1}{\ld@tuple@a{#1}{#2}}#4}
\newcommand*\Flat[2]{\ld@flat{#1}\ld@tuple@a{#1}{#2}}
\newcommand*\FunLift[4]{\ld@funlift{#1}{\ld@tuple@b{#1}{#2}{#3}}#4}
\newcommand*\FunLiftS[3]{\ld@funlifts{#1}{\ld@tuple@a{#1}{#2}}#3}
\newcommand*\FunSubstS[4]{\mathop{\ld@ob{#1}#3\ld@substs{#1}#2\ld@cb{#1}}#4}
\newcommand*\FunV[3]{\ld@funv{#1}{\ld@tuple@a{#1}{#2}}#3}
\newcommand*\FunW[3]{\ld@funw{#1}{\ld@tuple@a{#1}{#2}}#3}
\newcommand*\LEnv[2]{\ld@lenv{#1}#2}
\newcommand*\Length[2]{\ld@length@open{#1}#2\ld@length@close{#1}}
\newcommand*\Level[2]{\ld@level{#1}#2}
\newcommand*\LHead[4]{#2\ld@fs{#1}\ld@pair{#1}{\ld@tuple@a{#1}{#3}}#4}
\newcommand*\LRef[2]{\ld@lref{#1}#2}
\newcommand*\LSup[3]{#2\ld@lsup{#1}{}#3}
\newcommand*\LSupA[4]{#3\ld@lsupa{#1}{\ld@tuple@a{#1}{#2}}#4}
\newcommand*\LSupC[4]{#3\ld@lsup{#1}{\ld@tuple@a{#1}{#2}}#4}
\newcommand*\LSupT[4]{#3\ld@lsupt{#1}{\ld@tuple@a{#1}{#2}}#4}
\newcommand*\LTB[5]{\ld@tuple@b{#1}{#2}{#3}\ld@lt{#1}\ld@tuple@b{#1}{#4}{#5}}
\newcommand*\MkSH[3]{\ld@mksh{#1}\ld@tuple@b{#1}{#2}{#3}}
\newcommand*\Next[3]{\ld@next{#1}{\ld@tuple@a{#1}{#2}}#3}
\newcommand*\NextS[4]{\ld@next{#1}{^{#4}\ld@tuple@a{#1}{#2}}#3}
\newcommand*\PlusA[4]{#3\ld@plus{#1}{\ld@tuple@a{#1}{#2}}#4}
\newcommand*\RCandidate[5]{\ld@tuple@b{#1}{#3}{#4}\ld@in{#1}\ld@rcandidate{#1}{\ld@tuple@a{#1}{#2}}#5}
\newcommand*\RNormal[3]{#2\ld@env{#1}\ld@rnormal{#1}#3}
\newcommand*\RStep[3]{#2\ld@rstep{#1}#3}
\newcommand*\RStepA[4]{#2\ld@env{#1}#3\ld@rstep{#1}#4}
\newcommand*\RStepS[3]{#2\ld@rsteps{#1}#3}
\newcommand*\RStepSA[4]{#2\ld@env{#1}#3\ld@rsteps{#1}#4}
\newcommand*\RStrong[3]{#2\ld@env{#1}\ld@rstrong{#1}#3}
\newcommand*\SameTop[3]{#2\ld@sametop{#1}#3}
\newcommand*\Shift[3]{#2\ld@shift{#1}#3}
\newcommand*\SubEq[3]{#2\ld@subeq{#1}#3}
\newcommand*\Subst[5]{\mathop{\ld@oB{#1}#3\ld@subst{#1}#2\ld@cB{#1}}#4\ld@eq{#1}#5}
\newcommand*\SubstB[7]{\mathop{\ld@oB{#1}#3\ld@subst{#1}#2\ld@cB{#1}}\ld@tuple@b{#1}{#4}{#5}\ld@eq{#1}\ld@tuple@b{#1}{#6}{#7}}
\newcommand*\SubstS[5]{\mathop{\ld@oB{#1}#3\ld@substs{#1}#2\ld@cB{#1}}#4\ld@eq{#1}#5}
\newcommand*\SuccA[3]{\ld@succ{#1}{\ld@tuple@a{#1}{#2}}#3}
\newcommand*\THead[4]{\ld@pair{#1}{\ld@tuple@a{#1}{#2}}#3\ld@fs{#1}#4}
\newcommand*\To[3]{#2\ld@to{#1}#3}
\newcommand*\TStep[5]{#3\ld@env{#1}#4\ld@tstep{#1}{\ld@tuple@a{#1}{#2}}#5}
\newcommand*\TStepS[5]{#3\ld@env{#1}#4\ld@tsteps{#1}{\ld@tuple@a{#1}{#2}}#5}
\newcommand*\Type[5]{#3\ld@env{#1}#4\ld@type{#1}{\ld@tuple@a{#1}{#2}}#5}
\newcommand*\Valid[4]{\ld@valid{#1}{\ld@tuple@a{#1}{#2}}#3\ld@eq{#1}#4}
\newcommand*\WeightA[2]{\ld@weight{#1}\ld@tuple@a{#1}{#2}}
\newcommand*\WeightB[3]{\ld@weight{#1}\ld@tuple@b{#1}{#2}{#3}}

\makeatother

\endinput
