\def\havemjocommon{1}
-\ifx\mathbb\undefined
- \usepackage{amsfonts}
-\fi
+\input{mjo-font} % amsfonts and \mathpzc
\ifx\bigtimes\undefined
\usepackage{mathtools}
% 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} }
\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{Sn}{
- name={\ensuremath{\Sn}},
- description={the set of $n$-by-$n$ real symmetric matrices},
- sort=Sn
- }
-\fi
-
-% The space of complex Hermitian n-by-n matrices.
-\newcommand*{\Hn}[1][n]{
- \mathcal{H}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
-}
-
-\ifdefined\newglossaryentry
- \newglossaryentry{Hn}{
- name={\ensuremath{\Hn}},
- description={the set of $n$-by-$n$ complex Hermitian matrices},
- sort=Hn
- }
-\fi
-
%
% Basic set operations
%
\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.