]> matita.cs.unibo.it Git - helm.git/blob - matita/components/binaries/matex/test/basic_1.sty
- matex: minor improvements
[helm.git] / matita / components / binaries / matex / test / basic_1.sty
1 \NeedsTeXFormat{LaTeX2e}[1995/12/01]
2 \ProvidesPackage{basic_1}[2016/06/21 Notation for "cic:/matita/lambdadelta/basic_1/"]
3 \RequirePackage{legacy_1}
4 \RequirePackage{ground_1}
5 \ExecuteOptions{}
6 \ProcessOptions*
7
8 \let\OldEquiv=\Equiv
9
10 \makeatletter
11
12 \newcommand*\ld@ob[1]{\mathopen{[}}
13 \newcommand*\ld@cb[1]{\mathopen{]}}
14 \newcommand*\ld@oB[1]{\mathopen{\lBrack}}
15 \newcommand*\ld@cB[1]{\mathopen{\rBrack}}
16
17 \newcommand*\ld@coweight[1]{\setoplink{\equivVvert}{#1}{}}
18 \newcommand*\ld@drop[2]{\setoplink{\Downarrow}{#1}{#2}}
19 \newcommand*\ld@drops[2]{\setoplink{\Downarrow^*}{#1}{#2}}
20 \newcommand*\ld@equiv[2]{\setrellink{\equiv}{#1}{#2}}
21 \newcommand*\ld@funlift[2]{\setoplink{\uparrow}{#1}{#2}}
22 \newcommand*\ld@funlifts[2]{\setoplink{\uparrow^*}{#1}{}}
23 \newcommand*\ld@funv[2]{\setoplink{\mathsf{v}}{#1}{#2}}
24 \newcommand*\ld@funw[2]{\setoplink{\mathsf{w}}{#1}{#2}}
25 \newcommand*\ld@leaf[1]{\setoplink{\star}{#1}{}}
26 \newcommand*\ld@length@open[1]{\setopenlink{\vert}{#1}}
27 \newcommand*\ld@length@close[1]{\setcloselink{\vert}{#1}}
28 \newcommand*\ld@lenv[1]{\setoplink{\mathsf{lenv}}{#1}{}}
29 \newcommand*\ld@level[1]{\setoplink{\mathsf{level}}{#1}{}}
30 \newcommand*\ld@lref[1]{\setoplink{\#}{#1}{}}
31 \newcommand*\ld@next[2]{\setoplink{\mathsf{next}}{#1}{#2}}
32 \newcommand*\ld@sametop[1]{\setrellink{\eqsim}{#1}{}}
33 \newcommand*\ld@shift[1]{\setordlink{.}{#1}}
34 \newcommand*\ld@subst[1]{\setbinlink{/}{#1}{}}
35 \newcommand*\ld@substs[1]{\setbinlink{/^*}{#1}{}}
36 \newcommand*\ld@to[1]{\setrellink{\rightarrow}{#1}{}}
37 \newcommand*\ld@weight[1]{\setoplink{\equalparallel}{#1}{}}
38
39 \newcommand*\ld@tuple@a[2]{\ld@oa{#1}#2\ld@ca{#1}}
40
41 \newcommand*\AtomA[2]{\ld@leaf{#1}#2}
42 \newcommand*\AtomB[3]{\ld@leaf{#1}\ld@tuple@b{#1}{#2}{#3}}
43 \newcommand*\CoConsA[3]{#2\ld@cocons{#1}#3}
44 \newcommand*\ConsA[3]{#2\ld@cons{#1}#3}
45 \newcommand*\CoWeightA[2]{\ld@coweight{#1}\ld@tuple@a{#1}{#2}}
46 \newcommand*\CoWeightB[3]{\ld@coweight{#1}\ld@tuple@b{#1}{#2}{#3}}
47 \newcommand*\Drop[3]{\ld@drop{#1}{}#2\ld@eq{#1}#3}
48 \newcommand*\DropA[4]{\ld@drop{#1}{\ld@tuple@a{#1}{#2}}#3\ld@eq{#1}#4}
49 \newcommand*\DropB[5]{\ld@drop{#1}{\ld@tuple@b{#1}{#2}{#3}}#4\ld@eq{#1}#5}
50 \newcommand*\DropS[4]{\ld@drops{#1}{\ld@tuple@a{#1}{#2}}#3\ld@eq{#1}#4}
51 \renewcommand*\Equiv[3]{#2\ld@equiv{#1}{}#3}
52 \newcommand*\EquivA[4]{#3\ld@equiv{#1}{\ld@tuple@a{#1}{#2}}#4}
53 \newcommand*\FunLift[4]{\ld@funlift{#1}{\ld@tuple@b{#1}{#2}{#3}}#4}
54 \newcommand*\FunLiftS[3]{\ld@funlifts{#1}{\ld@tuple@a{#1}{#2}}#3}
55 \newcommand*\FunSubstS[4]{\mathop{\ld@ob{#1}#3\ld@substs{#1}#2\ld@cb{#1}}#4}
56 \newcommand*\FunV[3]{\ld@funv{#1}{\ld@tuple@a{#1}{#2}}#3}
57 \newcommand*\FunW[3]{\ld@funw{#1}{\ld@tuple@a{#1}{#2}}#3}
58 \newcommand*\LEnv[2]{\ld@lenv{#1}#2}
59 \newcommand*\Length[2]{\ld@length@open{#1}#2\ld@length@close{#1}}
60 \newcommand*\Level[2]{\ld@level{#1}#2}
61 \newcommand*\LRef[2]{\ld@lref{#1}#2}
62 \newcommand*\LTB[5]{\ld@tuple@b{#1}{#2}{#3}\ld@lt{#1}\ld@tuple@b{#1}{#4}{#5}}
63 \newcommand*\Next[3]{\ld@next{#1}{\ld@tuple@a{#1}{#2}}#3}
64 \newcommand*\SameTop[3]{#2\ld@sametop{#1}#3}
65 \newcommand*\Shift[3]{#2\ld@shift{#1}#3}
66 \newcommand*\Subst[5]{\mathop{\ld@oB{#1}#3\ld@subst{#1}#2\ld@cB{#1}}#4\ld@eq{#1}#5}
67 \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}}
68 \newcommand*\SubstS[5]{\mathop{\ld@oB{#1}#3\ld@substs{#1}#2\ld@cB{#1}}#4\ld@eq{#1}#5}
69 \newcommand*\To[3]{#2\ld@to{#1}#3}
70 \newcommand*\WeightA[2]{\ld@weight{#1}\ld@tuple@a{#1}{#2}}
71 \newcommand*\WeightB[3]{\ld@weight{#1}\ld@tuple@b{#1}{#2}{#3}}
72
73 \makeatother
74
75 \endinput