%
% Standard operations from linear algebra.
%
+\ifx\havemjolinearalgebra\undefined
+\def\havemjolinearalgebra{1}
-% Needed for \lvert, \rVert, etc. and \operatorname.
-\usepackage{amsmath}
-% Wasysym contains the \ocircle that we use in \directsumperp.
-\usepackage{wasysym}
+\ifx\lvert\undefined
+ \usepackage{amsmath} % \lvert, \rVert, etc. and \operatorname.
+\fi
-% Part of the adjustbox package; needed to clip the \perp sign.
-\usepackage{trimclip}
+\ifx\ocircle\undefined
+ \usepackage{wasysym}
+\fi
+
+\ifx\clipbox\undefined
+ % Part of the adjustbox package; needed to clip the \perp sign.
+ \usepackage{trimclip}
+\fi
\input{mjo-common}
% specialized to real matrices.
\newcommand*{\transpose}[1]{ #1^{T} }
+% The Moore-Penrose (or any other, I guess) pseudo-inverse of its
+% sole argument.
+\newcommand*{\pseudoinverse}[1]{ #1^{+} }
+
% The trace of an operator.
\newcommand*{\trace}[1]{ \operatorname{trace}\of{{#1}} }
\newcommand*{\matricize}[1]{ \operatorname{mat}\of{{#1}} }
% An inline column vector, with parentheses and a transpose operator.
-\newcommand*{\colvec}[1]{ \left({#1}\right)^{T} }
+\newcommand*{\colvec}[1]{ \transpose{\left({#1}\right)} }
% Bounded linear operators on some space. The required argument is the
% domain of those operators, and the optional argument is the
\DeclareMathOperator{\oplusperp}{\mathbin{
\ooalign{
$\ocircle$\cr
- \raisebox{0.65\height}{$\clipbox{0pt 0pt 0pt 0.5\height}{$\perp$}$}\cr
+ \raisebox{0.625\height}{$\clipbox{0pt 0pt 0pt 0.5\height}{$\perp$}$}\cr
}
}}
% Now declare an orthogonal direct sum in terms of \oplusperp.
\newcommand*{\directsumperp}[2]{ {#1}\oplusperp{#2} }
+
+
+\fi