X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=mjo-common.tex;h=2819bdc41d990e1ef05613554deb277c29ff06fb;hb=83458c3f65b80a7897ced0553804b38f4872fcb6;hp=6aac4ca84be42e3777562c7dd6aecd9526d1ebc0;hpb=ba0227140d34fe1c8cacdb4996b5896aec4c4013;p=mjotex.git

diff --git a/mjo-common.tex b/mjo-common.tex
index 6aac4ca..2819bdc 100644
--- a/mjo-common.tex
+++ b/mjo-common.tex
@@ -5,11 +5,11 @@
 \def\havemjocommon{1}
 
 
-% Needed for \mathbb.
-\usepackage{amsfonts}
+\input{mjo-font} % amsfonts and \mathpzc
 
-% Needed for \bigtimes.
-\usepackage{mathtools}
+\ifx\bigtimes\undefined
+  \usepackage{mathtools}
+\fi
 
 % Place the argument in matching left/right parentheses.
 \newcommand*{\of}[1]{ \left({#1}\right) }
@@ -35,6 +35,18 @@
 % A triple of things.
 \newcommand*{\triple}[3]{ \left({#1},{#2},{#3}\right) }
 
+% A four-tuple of things.
+\newcommand*{\quadruple}[4]{ \left({#1},{#2},{#3},{#4}\right) }
+
+% A five-tuple of things.
+\newcommand*{\quintuple}[5]{ \left({#1},{#2},{#3},{#4},{#5}\right) }
+
+% A six-tuple of things.
+\newcommand*{\sextuple}[6]{ \left({#1},{#2},{#3},{#4},{#5},{#6}\right) }
+
+% A seven-tuple of things.
+\newcommand*{\septuple}[7]{ \left({#1},{#2},{#3},{#4},{#5},{#6},{#7}\right) }
+
 % The Cartesian product of two things.
 \newcommand*{\cartprod}[2]{ {#1}\times{#2} }
 
@@ -64,35 +76,67 @@
   \mathbb{N}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
 }
 
+\ifdefined\newglossaryentry
+  \newglossaryentry{N}{
+    name={\ensuremath{\Nn[1]}},
+    description={the set of natural numbers},
+    sort=N
+  }
+\fi
+
 % The integral n-space, Z x Z x Z x ... x Z.
 \newcommand*{\Zn}[1][n]{
   \mathbb{Z}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
 }
 
+\ifdefined\newglossaryentry
+  \newglossaryentry{Z}{
+    name={\ensuremath{\Zn[1]}},
+    description={the ring of integers},
+    sort=Z
+  }
+\fi
+
 % The rational n-space, Q x Q x Q x ... x Q.
 \newcommand*{\Qn}[1][n]{
   \mathbb{Q}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
 }
 
+\ifdefined\newglossaryentry
+  \newglossaryentry{Q}{
+    name={\ensuremath{\Qn[1]}},
+    description={the field of rational numbers},
+    sort=Q
+  }
+\fi
+
 % The real n-space, R x R x R x ... x R.
 \newcommand*{\Rn}[1][n]{
   \mathbb{R}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
 }
 
+\ifdefined\newglossaryentry
+  \newglossaryentry{R}{
+    name={\ensuremath{\Rn[1]}},
+    description={the field of real numbers},
+    sort=R
+  }
+\fi
+
+
 % The complex n-space, C x C x C x ... x C.
 \newcommand*{\Cn}[1][n]{
   \mathbb{C}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
 }
 
-% The space of real symmetric n-by-n matrices.
-\newcommand*{\Sn}[1][n]{
-  \mathcal{S}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
-}
+\ifdefined\newglossaryentry
+  \newglossaryentry{C}{
+    name={\ensuremath{\Cn[1]}},
+    description={the field of complex numbers},
+    sort=C
+  }
+\fi
 
-% The space of complex Hermitian n-by-n matrices.
-\newcommand*{\Hn}[1][n]{
-  \mathcal{H}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
-}
 
 %
 % Basic set operations
@@ -128,6 +172,14 @@
 \newcommand*{\directsummany}[3]{ \binopmany{\bigoplus}{#1}{#2}{#3} }
 \newcommand*{\unionmany}[3]{ \binopmany{\bigcup}{#1}{#2}{#3} }
 
+\newcommand*{\powerset}[1]{\mathpzc{P}\of{{#1}}}
+\ifdefined\newglossaryentry
+  \newglossaryentry{powerset}{
+    name={\ensuremath{\powerset{X}}},
+    description={the ``powerset,'' or set of all subsets of $X$},
+    sort=p
+  }
+\fi
 
 % The four standard (UNLESS YOU'RE FRENCH) types of intervals along
 % the real line.