X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=mjo-arrow.tex;h=60530cb71020f3902e3b4c11f9a6498814241f5e;hb=6ee5658942c8662c360f0b1fd47dca460f761f48;hp=75b70c9d8b3670d94fb5ed5ca953d20b2464a008;hpb=d85706cc1efea350df9e957f6583a92d4e05359f;p=mjotex.git

diff --git a/mjo-arrow.tex b/mjo-arrow.tex
index 75b70c9..60530cb 100644
--- a/mjo-arrow.tex
+++ b/mjo-arrow.tex
@@ -1,6 +1,15 @@
 %
 % Things dealing with arrows in a category. Or functions, basically.
 %
+\ifx\havemjoarrow\undefined
+\def\havemjoarrow{1}
+
+
+\input{mjo-common} % for \of, at least.
+
+\ifx\operatorname\undefined
+  \usepackage{amsopn}
+\fi
 
 % The identity operator/arrow on its argument.
 \newcommand*{\identity}[1]{ \operatorname{id}_{{#1}} }
@@ -11,3 +20,9 @@
 
 % The inverse of an arrow, function, or whatever.
 \newcommand*{\inverse}[1]{ #1^{-1} }
+
+% The preimage of the second argument (a set) under the first (a function).
+\newcommand*{\preimage}[2]{ #1^{-1}\of{#2} }
+
+
+\fi