1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
%%
%% This is file `realtranspose.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% realtranspose.dtx (with options: `realtranspose')
%% Copyright 2020 Lars Quentin, Matthew Scroggs, Adam Townsend
%%
%% Permission is hereby granted, free of charge, to any person obtaining a copy of this software
%% and associated documentation files (the "Software"), to deal in the Software without restriction,
%% including without limitation the rights to use, copy, modify, merge, publish, distribute,
%% sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is
%% furnished to do so, subject to the following conditions:
%%
%% The above copyright notice and this permission notice shall be included in all copies or
%% substantial portions of the Software.
%%
%% THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING
%% BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
%% NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
%% DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
%% OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{realtranspose}[2020/10/08 realtranspose 1.1]
\RequirePackage{graphicx}
\newcommand{\realtranspose}[1]{
% The problem is, that within mathbin it always gets
% rendered as textstyle.
%
% To bypass that, we detect which style was used before
%
% This way, we can do fun stuff like
%
% \int_0^T dt = \realtranspose{ \int_0 } dt
%
\mathchoice{
% displaystyle
\mathbin{\rotatebox[origin=c]{90}{$\displaystyle #1$}}
}{
% textstyle
\mathbin{\rotatebox[origin=c]{90}{$\textstyle #1$}}
}{
% scriptstyle
\mathbin{\rotatebox[origin=c]{90}{$\scriptstyle #1$}}
}{
%scriptscriptstyle
\mathbin{\rotatebox[origin=c]{90}{$\scriptscriptstyle #1$}}
}
}
\endinput
%%
%% End of file `realtranspose.sty'.
|
