home *** CD-ROM | disk | FTP | other *** search
/ Otherware / Otherware_1_SB_Development.iso / mac / misc / tex / ozinp.sit / TeX-inputs / fleqn.sty < prev    next >
Encoding:
Text File  |  1988-10-11  |  1.1 KB  |  27 lines
  1. % fleqn.sty 6 Feb 85
  2. \def\[{\relax\ifmmode\@badmath\else\begingroup\trivlist \item[]\leavevmode
  3. \hbox to\linewidth\bgroup$ \displaystyle
  4. \hskip\mathindent\bgroup\fi}
  5. \def\]{\relax\ifmmode \egroup $\hfil \egroup \endtrivlist \endgroup\else
  6. \@badmath \fi}
  7. \def\equation{\refstepcounter{equation}\trivlist \item[]\leavevmode
  8. \hbox to\linewidth\bgroup $ \displaystyle
  9. \hskip\mathindent}
  10. \def\endequation{$\hfil \displaywidth\linewidth\@eqnnum\egroup \endtrivlist}
  11. \def\eqnarray{\stepcounter{equation}\let\@currentlabel=\theequation
  12. \global\@eqnswtrue
  13. \global\@eqcnt\z@\tabskip\mathindent\let\\=\@eqncr
  14. \abovedisplayskip\topsep\ifvmode\advance\abovedisplayskip\partopsep\fi
  15. \belowdisplayskip\abovedisplayskip
  16. \belowdisplayshortskip\abovedisplayskip
  17. \abovedisplayshortskip\abovedisplayskip
  18. $$\halign to
  19. \linewidth\bgroup\@eqnsel\hskip\@centering$\displaystyle\tabskip\z@
  20. {##}$&\global\@eqcnt\@ne \hskip 2\arraycolsep \hfil${##}$\hfil
  21. &\global\@eqcnt\tw@ \hskip 2\arraycolsep $\displaystyle{##}$\hfil
  22. \tabskip\@centering&\llap{##}\tabskip\z@\cr}
  23. \def\endeqnarray{\@@eqncr\egroup
  24. \global\advance\c@equation\m@ne$$\global\@ignoretrue }
  25. \newdimen\mathindent
  26. \mathindent = \leftmargini
  27.