summaryrefslogtreecommitdiff
path: root/support/hypertex/tanmoy/fleqn.hty
diff options
context:
space:
mode:
Diffstat (limited to 'support/hypertex/tanmoy/fleqn.hty')
-rw-r--r--support/hypertex/tanmoy/fleqn.hty34
1 files changed, 34 insertions, 0 deletions
diff --git a/support/hypertex/tanmoy/fleqn.hty b/support/hypertex/tanmoy/fleqn.hty
new file mode 100644
index 0000000000..25ce02344e
--- /dev/null
+++ b/support/hypertex/tanmoy/fleqn.hty
@@ -0,0 +1,34 @@
+\let\hypernoname=\relax
+\def\equation{\@beginparpenalty\predisplaypenalty
+ \@endparpenalty\postdisplaypenalty
+\let\hyper@n@=\hyperdef
+\let\hyperdef=\hyper@nique\refstepcounter{equation}%
+\let\hyperdef=\hyper@n@
+\trivlist \item[]\leavevmode
+\let\hyper@qn@=\theequation
+\def\theequation{\hyperdef\hypernoname{equation}{\hyper@qn@}{\hyper@qn@}}%
+ \hbox to\linewidth\bgroup $\m@th% $ TO MAKE DOLLAR NESTING OK
+ \displaystyle
+\hskip\mathindent}
+
+\def\eqnarray{\stepcounter{equation}%
+ \let\hyper@qn@=\theequation
+ \hyper@nique\hypernoname{equation}{\hyper@qn@}{}%
+ \edef\@currentlabel{%
+ \hyper@\hyperpr@ref\hypernoname{\hyper@qn@}}%
+\global\@eqnswtrue
+\global\@eqcnt\z@\tabskip\mathindent\let\\=\@eqncr
+\abovedisplayskip\topsep\ifvmode\advance\abovedisplayskip\partopsep\fi
+\belowdisplayskip\abovedisplayskip
+\belowdisplayshortskip\abovedisplayskip
+\abovedisplayshortskip\abovedisplayskip
+$$%
+\def\theequation{\hyperdef\hypernoname{equation}{\hyper@qn@}{\hyper@qn@}}%
+\edef\@currentlabel{%
+\hyper@\hyperpr@ref\noexpand\hypernoname{\noexpand\hyper@qn@}}%
+\m@th\halign
+to\linewidth\bgroup\@eqnsel\hskip\@centering$\displaystyle\tabskip\z@
+ {##}$&\global\@eqcnt\@ne \hskip 2\arraycolsep \hfil${##}$\hfil
+ &\global\@eqcnt\tw@ \hskip 2\arraycolsep $\displaystyle{##}$\hfil
+ \tabskip\@centering&\llap{##}\tabskip\z@\cr}
+