mjo-algebra.tex: fix glossary sorting of \variety

[mjotex.git] / mjo-algebra.tex

diff --git a/mjo-algebra.tex b/mjo-algebra.tex
index 010ab0512a5b719aeafdc40283eebff3b969b89c..3bb51c1c492eedefe78c254870cb939269a7aaab 100644 (file)
--- a/mjo-algebra.tex
+++ b/mjo-algebra.tex
@@ -1,9 +1,63 @@
 %
 % Abstract algebraic structures.
 %
+\ifx\havemjoalgebra\undefined
+\def\havemjoalgebra{1}
+
+
+\ifx\operatorname\undefined
+  \usepackage{amsopn}
+\fi
+
+\input{mjo-common} % for \of, and \binopmany
+
+
+% The additive identity element of its argument, which should be
+% an algebraic structure.
+\newcommand*{\zero}[1]{ 0_{{#1}} }
+
+\ifdefined\newglossaryentry
+  \newglossaryentry{zero}{
+    name={\ensuremath{\zero{R}}},
+    description={the additive identity element of $R$},
+    sort=z
+  }
+\fi
+
+% The multiplicative identity element of its argument, which should be
+% an algebraic structure.
+\newcommand*{\unit}[1]{ 1_{{#1}} }
+
+\ifdefined\newglossaryentry
+  \newglossaryentry{unit}{
+    name={\ensuremath{\unit{R}}},
+    description={the multiplicative identity (unit) element of $R$},
+    sort=u
+  }
+\fi
+
+% The direct sum of two things.
+\newcommand*{\directsum}[2]{ {#1}\oplus{#2} }
+
+% The direct sum of three things.
+\newcommand*{\directsumthree}[3]{ \directsum{#1}{\directsum{#2}{#3}} }
+
+% The (indexed) direct sum of many things.
+\newcommand*{\directsummany}[3]{ \binopmany{\bigoplus}{#1}{#2}{#3} }
+
+
+% The (sub)algebra generated by its argument, a subset of some ambient
+% algebra. By definition this is the smallest subalgebra (of the
+% ambient one) containing that set.
+\newcommand*{\alg}[1]{\operatorname{alg}\of{{#1}}}
+\ifdefined\newglossaryentry
+  \newglossaryentry{alg}{
+    name={\ensuremath{\alg{X}}},
+    description={the (sub)algebra generated by $X$},
+    sort=a
+  }
+\fi
 
-% Needed for \operatorname.
-\usepackage{amsopn}
 
 % The fraction field of its argument, an integral domain. The name
 % "Frac" was chosen here instead of "Quot" because the latter
@@ -11,7 +65,46 @@
 % some cases for... a quotient field (something mod something).
 \newcommand*{\Frac}[1]{\operatorname{Frac}\of{{#1}}}
 
+% The ideal generated by its argument, a subset consisting of ring or
+% algebra elements.
+\newcommand*{\ideal}[1]{\operatorname{ideal}\of{{#1}}}
+\ifdefined\newglossaryentry
+  \newglossaryentry{ideal}{
+    name={\ensuremath{\ideal{X}}},
+    description={the ideal generated by $X$},
+    sort=i
+  }
+\fi
+
+
 % The polynomial ring whose underlying commutative ring of
 % coefficients is the first argument and whose indeterminates (a
 % comma-separated list) are the second argumnt.
 \newcommand*{\polyring}[2]{{#1}\left[{#2}\right]}
+\ifdefined\newglossaryentry
+  \newglossaryentry{polyring}{
+    name={\ensuremath{\polyring{R}{X}}},
+    description={polynomials with coefficients in $R$ and variable $X$},
+    sort=p
+  }
+\fi
+
+
+% The stabilizer subgroup of its first argument that fixes the point
+% given by its second argument.
+\newcommand*{\Stab}[2]{ #1_{#2} }
+
+
+% The affine algebraic variety consisting of the common solutions to
+% every polynomial in its argument, which should be a subset of some
+% polynomial ring.
+\newcommand*{\variety}[1]{ \mathcal{V}\of{{#1}} }
+\ifdefined\newglossaryentry
+  \newglossaryentry{variety}{
+    name={\ensuremath{\variety{I}}},
+    description={variety corresponding to the ideal $I$},
+    sort=v
+  }
+\fi
+
+\fi