Omit the exponent "1" from product spaces.

[mjotex.git] / mjo-common.tex

diff --git a/mjo-common.tex b/mjo-common.tex
index 829991695025e23a763a74e457091585e381c67a..40a7d6c243f657f2f2d1809709bacded8499d74d 100644 (file)
--- a/mjo-common.tex
+++ b/mjo-common.tex
@@ -8,6 +8,9 @@
 % Group terms using parentheses.
 \providecommand*{\qty}[1]{ \left( {#1} \right) }
 
+% Group terms using square brackets.
+\providecommand*{\sqty}[1]{ \left[ {#1} \right] }
+
 % Create a set from the given elements
 \providecommand*{\set}[1]{ \left\lbrace {#1} \right\rbrace }
 
@@ -19,3 +22,32 @@
 
 % A pair of things.
 \providecommand*{\pair}[2]{ \left( {#1}, {#2} \right) }
+
+%
+% Product spaces
+%
+% All of the product spaces (for example, R^n) that follow default to
+% an exponent of ``n'', but that exponent can be changed by providing
+% it as an optional argument. If the exponent given is ``1'', then it
+% will be omitted entirely.
+%
+
+% The integral n-space, Z x Z x Z x ... x Z.
+\providecommand*{\Zn}[1][n]{
+  \mathbb{Z}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
+}
+
+% The rational n-space, Q x Q x Q x ... x Q.
+\providecommand*{\Qn}[1][n]{
+  \mathbb{Q}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
+}
+
+% The real n-space, R x R x R x ... x R.
+\providecommand*{\Rn}[1][n]{
+  \mathbb{R}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
+}
+
+% The complex n-space, C x C x C x ... x C.
+\providecommand*{\Cn}[1][n]{
+  \mathbb{C}\if\detokenize{#1}\detokenize{1}{}\else^{#1}\fi
+}