!def![<!relax!ifmmode!@badmath!else!begingroup!trivlist !item()!leavevmode
!hbox to!linewidth!bgroup$
!displaystyle
!hskip!mathindent!bgroup!fi>
!def!]<!relax!ifmmode !egroup $!hfil
!egroup !endtrivlist !endgroup!else !@badmath !fi>
!def!equation<!refstepcounter<equation>!trivlist !item()!leavevmode
!hbox to!linewidth!bgroup $
!displaystyle
!hskip!mathindent>
!def!endequation<$!hfil
!displaywidth!linewidth!@eqnnum!egroup !endtrivlist>
!def!eqnarray<!stepcounter<equation>!let!@currentlabel=!theequation
!global!@eqnswtrue
!global!@eqcnt!z@!tabskip!mathindent!let!!=!@eqncr
!abovedisplayskip!topsep!ifvmode!advance!abovedisplayskip!partopsep!fi
!belowdisplayskip!abovedisplayskip
!belowdisplayshortskip!abovedisplayskip
!abovedisplayshortskip!abovedisplayskip
$$!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>
!def!endeqnarray<!@@eqncr!egroup
!global!advance!c@equation!m@ne$$!global!@ignoretrue
>
!newdimen!mathindent
!mathindent = !leftmargini