diff options
Diffstat (limited to 'Master/texmf-dist/tex/phyzzx/base/phyzzx.tex')
-rw-r--r-- | Master/texmf-dist/tex/phyzzx/base/phyzzx.tex | 931 |
1 files changed, 0 insertions, 931 deletions
diff --git a/Master/texmf-dist/tex/phyzzx/base/phyzzx.tex b/Master/texmf-dist/tex/phyzzx/base/phyzzx.tex deleted file mode 100644 index ad05eea87e0..00000000000 --- a/Master/texmf-dist/tex/phyzzx/base/phyzzx.tex +++ /dev/null @@ -1,931 +0,0 @@ -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -%%% This is PHYZZX macro package. % % % % % % % % % % % % % % % % % -%% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -%%% This version of PHYZZX should be used with Version >1.0 of TEX % % -%% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -%%% To preload both PLAIN and PHYZZX, begin your file with % % % % -%%% a line "%macropackage=phyzzx" instead of "\input phyzzx". % % % % -%% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%%%%%%% Created by Vadim Kaplunovsky in June 1984. %%%%%%%%%%%%%%%%%% -% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -%%%%%%%%%%%% Latest update/debug: April 27, 1988 %%%%%%%%%%%%%%%%%%%% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -\expandafter\ifx\csname phyzzx\endcsname\relax - \message{It is better to use PHYZZX format than to - \string\input\space PHYZZX}\else - \wlog{PHYZZX macros are already loaded and are not - \string\input\space again}% - \endinput \fi -% -\catcode`\@=11 % This allows us to modify PLAIN macros. -% -\let\rel@x=\relax -\let\n@expand=\relax -\def\pr@tect{\let\n@expand=\noexpand} -\let\protect=\pr@tect -\let\gl@bal=\global -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% First, I define fonts and basic spacing parameters -% -\newfam\cpfam -% -\newdimen\b@gheight \b@gheight=12pt -\newcount\f@ntkey \f@ntkey=0 -\def\f@m{\afterassignment\samef@nt\f@ntkey=} -\def\samef@nt{\fam=\f@ntkey \the\textfont\f@ntkey\rel@x} -\def\setstr@t{\setbox\strutbox=\hbox{\vrule height 0.85\b@gheight - depth 0.35\b@gheight width\z@ }} -% -\input phyzzx.fonts -% Actual font definitions are kept in a separate file -% to facilitate font substitution. -% -\def\rm{\n@expand\f@m0 } -\def\mit{\n@expand\f@m1 } \let\oldstyle=\mit -\def\cal{\n@expand\f@m2 } -\def\it{\n@expand\f@m\itfam} -\def\sl{\n@expand\f@m\slfam} -\def\bf{\n@expand\f@m\bffam} -\def\tt{\n@expand\f@m\ttfam} -\def\caps{\n@expand\f@m\cpfam} \let\cp=\caps -\def\em@{\rel@x\ifnum\f@ntkey=0 \it \else - \ifnum\f@ntkey=\bffam \it \else \rm \fi \fi } -\def\em{\n@expand\em@} -% -\def\fourteenpoint{\fourteenf@nts \samef@nt \b@gheight=14pt \setstr@t } -\def\twelvepoint{\twelvef@nts \samef@nt \b@gheight=12pt \setstr@t } -\def\tenpoint{\tenf@nts \samef@nt \b@gheight=10pt \setstr@t } -% -% -\normalbaselineskip = 20pt plus 0.2pt minus 0.1pt -\normallineskip = 1.5pt plus 0.1pt minus 0.1pt -\normallineskiplimit = 1.5pt -\newskip\normaldisplayskip -\normaldisplayskip = 20pt plus 5pt minus 10pt -\newskip\normaldispshortskip -\normaldispshortskip = 6pt plus 5pt -\newskip\normalparskip -\normalparskip = 6pt plus 2pt minus 1pt -\newskip\skipregister -\skipregister = 5pt plus 2pt minus 1.5pt -% -\newif\ifsingl@ -\newif\ifdoubl@ -\newif\iftwelv@ \twelv@true -% -\def\singlespace{\singl@true\doubl@false\spaces@t} -\def\doublespace{\singl@false\doubl@true\spaces@t} -\def\normalspace{\singl@false\doubl@false\spaces@t} -\def\Tenpoint{\tenpoint\twelv@false\spaces@t} -\def\Twelvepoint{\twelvepoint\twelv@true\spaces@t} -% -\def\spaces@t{\rel@x - \iftwelv@ \ifsingl@\subspaces@t3:4;\else\subspaces@t1:1;\fi - \else \ifsingl@\subspaces@t3:5;\else\subspaces@t4:5;\fi \fi - \ifdoubl@ \multiply\baselineskip by 5 - \divide\baselineskip by 4 \fi } -% -\def\subspaces@t#1:#2;{ - \baselineskip = \normalbaselineskip - \multiply\baselineskip by #1 \divide\baselineskip by #2 - \lineskip = \normallineskip - \multiply\lineskip by #1 \divide\lineskip by #2 - \lineskiplimit = \normallineskiplimit - \multiply\lineskiplimit by #1 \divide\lineskiplimit by #2 - \parskip = \normalparskip - \multiply\parskip by #1 \divide\parskip by #2 - \abovedisplayskip = \normaldisplayskip - \multiply\abovedisplayskip by #1 \divide\abovedisplayskip by #2 - \belowdisplayskip = \abovedisplayskip - \abovedisplayshortskip = \normaldispshortskip - \multiply\abovedisplayshortskip by #1 - \divide\abovedisplayshortskip by #2 - \belowdisplayshortskip = \abovedisplayshortskip - \advance\belowdisplayshortskip by \belowdisplayskip - \divide\belowdisplayshortskip by 2 - \smallskipamount = \skipregister - \multiply\smallskipamount by #1 \divide\smallskipamount by #2 - \medskipamount = \smallskipamount \multiply\medskipamount by 2 - \bigskipamount = \smallskipamount \multiply\bigskipamount by 4 } -% -\def\normalbaselines{ \baselineskip=\normalbaselineskip - \lineskip=\normallineskip \lineskiplimit=\normallineskip - \iftwelv@\else \multiply\baselineskip by 4 \divide\baselineskip by 5 - \multiply\lineskiplimit by 4 \divide\lineskiplimit by 5 - \multiply\lineskip by 4 \divide\lineskip by 5 \fi } -% -\Twelvepoint % That's the default -% -\interlinepenalty=50 -\interfootnotelinepenalty=5000 -\predisplaypenalty=9000 -\postdisplaypenalty=500 -\hfuzz=1pt -\vfuzz=0.2pt -\newdimen\HOFFSET \HOFFSET=0pt -\newdimen\VOFFSET \VOFFSET=0pt -\newdimen\HSWING \HSWING=0pt -\dimen\footins=8in -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Next, I define output routines, footnotes & related stuff. -% -\newskip\pagebottomfiller -\pagebottomfiller=\z@ plus \z@ minus \z@ -% -\def\pagecontents{ - \ifvoid\topins\else\unvbox\topins\vskip\skip\topins\fi - \dimen@ = \dp255 \unvbox255 - \vskip\pagebottomfiller - \ifvoid\footins\else\vskip\skip\footins\footrule\unvbox\footins\fi - \ifr@ggedbottom \kern-\dimen@ \vfil \fi } -% -\def\makeheadline{\vbox to 0pt{ \skip@=\topskip - \advance\skip@ by -12pt \advance\skip@ by -2\normalbaselineskip - \vskip\skip@ \line{\vbox to 12pt{}\the\headline} \vss - }\nointerlineskip} -\def\makefootline{\baselineskip = 1.5\normalbaselineskip - \line{\the\footline}} -% -\newif\iffrontpage -\newif\ifp@genum -\def\nopagenumbers{\p@genumfalse} -\def\pagenumbers{\p@genumtrue} -\pagenumbers -% -\newtoks\paperheadline -\newtoks\paperfootline -\newtoks\letterheadline -\newtoks\letterfootline -\newtoks\letterinfo -\newtoks\date -% -\paperheadline={\hfil} -\paperfootline={\hss\iffrontpage\else\ifp@genum\tenrm\folio\hss\fi\fi} -\letterheadline{\iffrontpage \hfil \else - \rm \ifp@genum page~~\folio\fi \hfil\the\date \fi} -\letterfootline={\iffrontpage\the\letterinfo\else\hfil\fi} -\letterinfo={\hfil} -% -\def\monthname{\rel@x\ifcase\month 0/\or January\or February\or - March\or April\or May\or June\or July\or August\or September\or - October\or November\or December\else\number\month/\fi} -\def\today{\monthname~\number\day, \number\year} -\date={\today} -% -\headline=\paperheadline % The default is -\footline=\paperfootline % \papers -% -\countdef\pageno=1 \countdef\pagen@=0 -\countdef\pagenumber=1 \pagenumber=1 -\def\advancepageno{\gl@bal\advance\pagen@ by 1 - \ifnum\pagenumber<0 \gl@bal\advance\pagenumber by -1 - \else\gl@bal\advance\pagenumber by 1 \fi - \gl@bal\frontpagefalse \swing@ } -% -\def\folio{\ifnum\pagenumber<0 \romannumeral-\pagenumber - \else \number\pagenumber \fi } -% -\def\swing@{\ifodd\pagenumber \gl@bal\advance\hoffset by -\HSWING - \else \gl@bal\advance\hoffset by \HSWING \fi } -% -\def\footrule{\dimen@=\prevdepth\nointerlineskip - \vbox to 0pt{\vskip -0.25\baselineskip \hrule width 0.35\hsize \vss} - \prevdepth=\dimen@ } -% -\let\footnotespecial=\rel@x -\newdimen\footindent -\footindent=24pt -\def\Textindent#1{\noindent\llap{#1\enspace}\ignorespaces} -% -\def\Vfootnote#1{\insert\footins\bgroup - \interlinepenalty=\interfootnotelinepenalty \floatingpenalty=20000 - \singl@true\doubl@false\Tenpoint - \splittopskip=\ht\strutbox \boxmaxdepth=\dp\strutbox - \leftskip=\footindent \rightskip=\z@skip - \parindent=0.5\footindent \parfillskip=0pt plus 1fil - \spaceskip=\z@skip \xspaceskip=\z@skip \footnotespecial - \Textindent{#1}\footstrut\futurelet\next\fo@t} -% -\def\Footnote#1{\attach{${#1}$}\Vfootnote{#1}} -\def\vfootnote#1{\Vfootnote{${#1}$}} -\def\footnote#1{\attach{#1}\vfootnote{#1}} -\def\footattach{\attach\footsymbol} -\def\foot{\attach\footsymbolgen\vfootnote{\footsymbol}} -\let\footsymbol=\star -% -\newcount\lastf@@t \lastf@@t=-1 -\newcount\footsymbolcount \footsymbolcount=0 -\newif\ifPhysRev -% -\def\footsymbolgen{\bumpfootsymbolcount \generatefootsymbol \footsymbol } -% -\def\bumpfootsymbolcount{\rel@x - \iffrontpage \bumpfootsymbolpos \else \advance\lastf@@t by 1 - \ifPhysRev \bumpfootsymbolneg \else \bumpfootsymbolpos \fi \fi - \gl@bal\lastf@@t=\pagen@ } -\def\bumpfootsymbolpos{\ifnum\footsymbolcount <0 - \gl@bal\footsymbolcount =0 \fi - \ifnum\lastf@@t<\pagen@ \gl@bal\footsymbolcount=0 - \else \gl@bal\advance\footsymbolcount by 1 \fi } -\def\bumpfootsymbolneg{\ifnum\footsymbolcount >0 - \gl@bal\footsymbolcount =0 \fi - \gl@bal\advance\footsymbolcount by -1 } -% -\def\fd@f#1 {\xdef\footsymbol{\mathchar"#1 }} -\def\generatefootsymbol{\ifcase\footsymbolcount \fd@f 13F \or \fd@f 279 - \or \fd@f 27A \or \fd@f 278 \or \fd@f 27B \else - \ifnum\footsymbolcount <0 \fd@f{023 \number-\footsymbolcount } - \else \fd@f 203 {\loop \ifnum\footsymbolcount >5 - \fd@f{203 \footsymbol } \advance\footsymbolcount by -1 - \repeat }\fi \fi } - -% -\def\nonfrenchspacing{\sfcode`\.=3001 \sfcode`\!=3000 \sfcode`\?=3000 - \sfcode`\:=2000 \sfcode`\;=1500 \sfcode`\,=1251 } -\nonfrenchspacing -\newdimen\d@twidth -{\setbox0=\hbox{s.} \gl@bal\d@twidth=\wd0 \setbox0=\hbox{s} - \gl@bal\advance\d@twidth by -\wd0 } -\def\removehglue{\loop \unskip \ifdim\lastskip >\z@ \repeat } -\def\roll@ver#1{\removehglue \nobreak \count255 =\spacefactor \dimen@=\z@ - \ifnum\count255 =3001 \dimen@=\d@twidth \fi - \ifnum\count255 =1251 \dimen@=\d@twidth \fi - \iftwelv@ \kern-\dimen@ \else \kern-0.83\dimen@ \fi - #1\spacefactor=\count255 } -\def\step@ver#1{\rel@x \ifmmode #1\else \ifhmode - \roll@ver{${}#1$}\else {\setbox0=\hbox{${}#1$}}\fi\fi } -\def\attach#1{\step@ver{\strut^{\mkern 2mu #1} }} -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Here come chapter, section, subsection & appendix macros. -% -\newcount\chapternumber \chapternumber=0 -\newcount\sectionnumber \sectionnumber=0 -\newcount\equanumber \equanumber=0 -\let\chapterlabel=\rel@x -\let\sectionlabel=\rel@x -\newtoks\chapterstyle \chapterstyle={\Number} -\newtoks\sectionstyle \sectionstyle={\Number} -\newskip\chapterskip \chapterskip=\bigskipamount -\newskip\sectionskip \sectionskip=\medskipamount -\newskip\headskip \headskip=8pt plus 3pt minus 3pt -\newdimen\chapterminspace \chapterminspace=15pc -\newdimen\sectionminspace \sectionminspace=10pc -\newdimen\referenceminspace \referenceminspace=20pc -% -\newif\ifcn@ \cn@true -\newif\ifcn@@ \cn@@false -\def\numberedchapters{\cn@true} -\def\unnumberedchapters{\cn@false\sequentialequations} -% -\def\chapterreset{\gl@bal\advance\chapternumber by 1 - \ifnum\equanumber<0 \else\gl@bal\equanumber=0\fi - \sectionnumber=0 \let\sectionlabel=\rel@x - \ifcn@ \gl@bal\cn@@true {\pr@tect - \xdef\chapterlabel{\the\chapterstyle{\the\chapternumber}}}% - \else \gl@bal\cn@@false \gdef\chapterlabel{\rel@x}\fi } -% -\def\@alpha#1{\count255='140 \advance\count255 by #1\char\count255} - \def\alphabetic{\n@expand\@alpha} -\def\@Alpha#1{\count255='100 \advance\count255 by #1\char\count255} - \def\Alphabetic{\n@expand\@Alpha} -\def\@Roman#1{\uppercase\expandafter{\romannumeral #1}} - \def\Roman{\n@expand\@Roman} -\def\@roman#1{\romannumeral #1} \def\roman{\n@expand\@roman} -\def\@number#1{\number #1} \def\Number{\n@expand\@number} -\def\BLANK#1{\rel@x} \let\BLANC=\BLANK -% -\def\titleparagraphs{\interlinepenalty=9999 - \leftskip=0.03\hsize plus 0.22\hsize minus 0.03\hsize - \rightskip=\leftskip \parfillskip=0pt - \hyphenpenalty=9000 \exhyphenpenalty=9000 - \tolerance=9999 \pretolerance=9000 - \spaceskip=0.333em \xspaceskip=0.5em } -\def\titlestyle#1{\par\begingroup \titleparagraphs - \iftwelv@\fourteenpoint\else\twelvepoint\fi - \noindent #1\par\endgroup } -% -\def\spacecheck#1{\dimen@=\pagegoal\advance\dimen@ by -\pagetotal - \ifdim\dimen@<#1 \ifdim\dimen@>0pt \vfil\break \fi\fi} -% -\def\chapter#1{\par \penalty-300 \vskip\chapterskip - \spacecheck\chapterminspace - \chapterreset \titlestyle{\ifcn@@\chapterlabel.~\fi #1} - \nobreak\vskip\headskip \penalty 30000 - {\pr@tect\wlog{\string\chapter\space \chapterlabel}} } -\let\chap=\chapter -% -\def\section#1{\par \ifnum\lastpenalty=30000\else - \penalty-200\vskip\sectionskip \spacecheck\sectionminspace\fi - \gl@bal\advance\sectionnumber by 1 - {\pr@tect - \xdef\sectionlabel{\ifcn@@ \chapterlabel.\fi - \the\sectionstyle{\the\sectionnumber}}% - \wlog{\string\section\space \sectionlabel}}% - \noindent {\caps\enspace\sectionlabel.~~#1}\par - \nobreak\vskip\headskip \penalty 30000 } -% -\def\subsection#1{\par - \ifnum\the\lastpenalty=30000\else \penalty-100\smallskip \fi - \noindent\undertext{#1}\enspace \vadjust{\penalty5000}} -\let\subsec=\subsection -% -\def\undertext#1{\vtop{\hbox{#1}\kern 1pt \hrule}} -% -\def\ACK{\par\penalty-100\medskip \spacecheck\sectionminspace - \line{\fourteenrm\hfil ACKNOWLEDGEMENTS\hfil}\nobreak\vskip\headskip } -\def\ack{\subsection{Acknowledgements:}} -% -\def\APPENDIX#1#2{\par\penalty-300\vskip\chapterskip - \spacecheck\chapterminspace \chapterreset \xdef\chapterlabel{#1} - \titlestyle{APPENDIX #2} \nobreak\vskip\headskip \penalty 30000 - \wlog{\string\Appendix~\chapterlabel} } -\def\Appendix#1{\APPENDIX{#1}{#1}} -\def\appendix{\APPENDIX{A}{}} -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Here come macros for equation numbering. -% -\def\eqname#1{\rel@x {\pr@tect - \ifnum\equanumber<0 \xdef#1{{\rm(\number-\equanumber)}}% - \gl@bal\advance\equanumber by -1 - \else \gl@bal\advance\equanumber by 1 - \xdef#1{{\rm(\ifcn@@ \chapterlabel.\fi \number\equanumber)}}\fi - }#1} -% -\def\eq{\eqname\?} -\def\eqn{\eqno\eqname} -\def\leqn{\leqno\eqname} -% -\def\eqinsert#1{\noalign{\dimen@=\prevdepth \nointerlineskip - \setbox0=\hbox to\displaywidth{\hfil #1} - \vbox to 0pt{\kern 0.5\baselineskip\hbox{$\!\box0\!$}\vss} - \prevdepth=\dimen@}} -% -\def\leqinsert#1{\eqinsert{#1\hfill}} -\def\mideqn#1{\eqinsert{\eqname{#1}}} -\def\midleqn#1{\leqinsert{\eqname{#1}}} -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Here come items and lists -% -\def\GENITEM#1;#2{\par \hangafter=0 \hangindent=#1 - \Textindent{$ #2 $}\ignorespaces} -\outer\def\newitem#1=#2;{\gdef#1{\GENITEM #2;}} -% -\let\Item=\item -\newdimen\itemsize \itemsize=30pt -\newitem\item=1\itemsize; -\newitem\sitem=1.75\itemsize; \let\subitem=\sitem -\newitem\ssitem=2.5\itemsize; \let\subsubitem\ssitem -% -\outer\def\newlist#1=#2{\toks0={#2}\toks1={#3}% - \count255=\escapechar \escapechar=-1 - \alloc@0\list\countdef\insc@unt\listcount \listcount=0 - \edef#1{\par - \countdef\listcount=\the\allocationnumber - \advance\listcount by 1 - \hangafter=0 \hangindent=#4 - \Textindent{\the\toks0{\listcount}\the\toks1}} - \expandafter\expandafter\expandafter - \edef\c@t#1{begin}{\par - \countdef\listcount=\the\allocationnumber \listcount=1 - \hangafter=0 \hangindent=#4 - \Textindent{\the\toks0{\listcount}\the\toks1}} - \expandafter\expandafter\expandafter - \edef\c@t#1{con}{\par \hangafter=0 \hangindent=#4 \noindent} - \escapechar=\count255} -\def\c@t#1#2{\csname\string#1#2\endcsname} -% -\newlist\point=\Number&.&1.0\itemsize; -\newlist\subpoint=(\alphabetic&)&1.75\itemsize; -\newlist\subsubpoint=(\roman&)&2.5\itemsize; -% -\let\spoint=\subpoint \let\sspoint=\subsubpoint -\let\spointbegin=\subpointbegin \let\sspointbegin=\subsubpointbegin -\let\spointcon=\subpointcon \let\sspointcon=\subsubpointcon -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Here come macros for references, figures & tables. -% -% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -%% First, references. -% -\newcount\referencecount \referencecount=0 -\newcount\lastrefsbegincount \lastrefsbegincount=0 -\newif\ifreferenceopen \newwrite\referencewrite -\newdimen\refindent \refindent=30pt -% -\def\normalrefmark#1{\attach{\scriptscriptstyle [ #1 ] }} -\let\PRrefmark=\attach -\def\NPrefmark#1{\step@ver{{\;[#1]}}} -\def\refmark#1{\rel@x\ifPhysRev\PRrefmark{#1}\else\normalrefmark{#1}\fi} -% -\def\refend@{\refmark{\number\referencecount}} -\def\refend{\refend@{}\space } -\def\refsend{\refmark{\count255=\referencecount - \advance\count255 by-\lastrefsbegincount - \ifcase\count255 \number\referencecount - \or \number\lastrefsbegincount,\number\referencecount - \else \number\lastrefsbegincount-\number\referencecount \fi}\space } -% -\def\REFNUM#1{\rel@x \gl@bal\advance\referencecount by 1 - \xdef#1{\the\referencecount }} -\def\Refnum#1{\REFNUM #1\refend@ } \let\refnum=\Refnum -\def\REF#1{\REFNUM #1\R@FWRITE\ignorespaces} -\def\Ref#1{\Refnum #1\REFWRITE } -\def\ref{\Ref\?} -\def\REFS#1{\REFNUM #1\gl@bal\lastrefsbegincount=\referencecount - \REFWRITE } -\def\refs{\REFS\?} -\def\refc{\REF\?} -\let\refscon=\refc \let\REFSCON=\REF -% -\def\r@fitem#1{\par \hangafter=0 \hangindent=\refindent \Textindent{#1}} -\def\refitem#1{\r@fitem{#1.}} -\def\NPrefitem#1{\r@fitem{[#1]}} -\def\NPrefs{\let\refmark=\NPrefmark \let\refitem=NPrefitem} -% -% -\def\REFWRITE{\R@FWRITE\rel@x } -\def\R@FWRITE#1{\ifreferenceopen \else \gl@bal\referenceopentrue - \immediate\openout\referencewrite=\jobname.refs - \toks@={\begingroup \refoutspecials \catcode`\^^M=10 }% - \immediate\write\referencewrite{\the\toks@}\fi - \immediate\write\referencewrite{\noexpand\refitem % - {\the\referencecount}}% - \p@rse@ndwrite \referencewrite #1} -% -\begingroup - \catcode`\^^M=\active \let^^M=\relax % - \gdef\p@rse@ndwrite#1#2{\begingroup \catcode`\^^M=12 \newlinechar=`\^^M% - \chardef\rw@write=#1\sc@nlines#2}% - \gdef\sc@nlines#1#2{\sc@n@line \g@rbage #2^^M\endsc@n \endgroup #1}% - \gdef\sc@n@line#1^^M{\expandafter\toks@\expandafter{\deg@rbage #1}% - \immediate\write\rw@write{\the\toks@}% - \futurelet\n@xt \sc@ntest }% -\endgroup -\def\sc@ntest{\ifx\n@xt\endsc@n \let\n@xt=\rel@x - \else \let\n@xt=\sc@n@notherline \fi \n@xt } -\def\sc@n@notherline{\sc@n@line \g@rbage } -\def\deg@rbage#1{} -\let\g@rbage=\relax \let\endsc@n=\relax -% -% -\def\refout{\par\penalty-400\vskip\chapterskip - \spacecheck\referenceminspace - \ifreferenceopen \Closeout\referencewrite \referenceopenfalse \fi - \line{\fourteenrm\hfil REFERENCES\hfil}\vskip\headskip - \input \jobname.refs - } -\def\refoutspecials{\sfcode`\.=1000 \interlinepenalty=1000 - \rightskip=\z@ plus 1em minus \z@ } -% -\def\Closeout#1{\toks0={\par\endgroup}\immediate\write#1{\the\toks0}% - \immediate\closeout#1} -% -% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -%% Next, figure captions and table captions. -% -\newcount\figurecount \figurecount=0 -\newcount\tablecount \tablecount=0 -\newif\iffigureopen \newwrite\figurewrite -\newif\iftableopen \newwrite\tablewrite -% -\def\FIGNUM#1{\rel@x \gl@bal\advance\figurecount by 1 - \xdef#1{\the\figurecount}} -\def\FIGURE#1{\FIGNUM #1\F@GWRITE\ignorespaces } -\let\FIG=\FIGURE -\def\Fig{\FIGNUM\?Figure~\?\FIGWRITE } -\def\fig{\FIGNUM\?figure~\?\FIGWRITE } -\def\figitem#1{\r@fitem{#1)}} -\def\FIGWRITE{\F@GWRITE\rel@x } -% -\def\TABNUM#1{\rel@x \gl@bal\advance\tablecount by 1 - \xdef#1{\the\tablecount}} -\def\TABLE#1{\TABNUM #1\T@BWRITE\ignorespaces } -\def\Table{\TABNUM\?Table~\?\TABWRITE } -\def\tabitem#1{\r@fitem{#1:}} -\def\TABWRITE{\T@BWRITE\rel@x } -% -\def\F@GWRITE#1{\iffigureopen \else \gl@bal\figureopentrue - \immediate\openout\figurewrite=\jobname.figs - \toks@={\begingroup \catcode`\^^M=10 }% - \immediate\write\figurewrite{\the\toks@}\fi - \immediate\write\figurewrite{\noexpand\figitem % - {\the\figurecount}}% - \p@rse@ndwrite \figurewrite #1} -\def\T@BWRITE#1{\iftableopen \else \gl@bal\tableopentrue - \immediate\openout\tablewrite=\jobname.tabs - \toks@={\begingroup \catcode`\^^M=10 }% - \immediate\write\tablewrite{\the\toks@}\fi - \immediate\write\tablewrite{\noexpand\tabitem % - {\the\tablecount}}% - \p@rse@ndwrite \tablewrite #1} -% -\def\figout{\par\penalty-400 - \vskip\chapterskip\spacecheck\referenceminspace - \iffigureopen \Closeout\figurewrite \figureopenfalse \fi - \line{\fourteenrm\hfil FIGURE CAPTIONS\hfil}\vskip\headskip - \input \jobname.figs - } -\def\tabout{\par\penalty-400 - \vskip\chapterskip\spacecheck\referenceminspace - \iftableopen \Closeout\tablewrite \tableopenfalse \fi - \line{\fourteenrm\hfil TABLE CAPTIONS\hfil}\vskip\headskip - \input \jobname.tabs - } -% -% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -%% Finally, inserted figures. -% -% -\newbox\picturebox -\def\p@cht{\ht\picturebox } -\def\p@cwd{\wd\picturebox } -\def\p@cdp{\dp\picturebox } -\newdimen\xshift -\newdimen\yshift -% -\newdimen\captionwidth -\newskip\captionskip -\captionskip=15pt plus 5pt minus 3pt -\def\fullwidth{\captionwidth=\hsize } -\newtoks\Caption -\newif\ifcaptioned -\newif\ifselfcaptioned -\def\caption{\captionedtrue \Caption } -\newcount\linesabove -% -\newif\iffileexists -\newtoks\picfilename -\def\fil@#1 {\fileexiststrue \picfilename={#1}} -\def\file#1{\if=#1\let\n@xt=\fil@ \else \def\n@xt{\fil@ #1}\fi \n@xt } -% -\def\pl@t{\begingroup \pr@tect - \setbox\picturebox=\hbox{}\fileexistsfalse - \let\height=\p@cht \let\width=\p@cwd \let\depth=\p@cdp - \xshift=\z@ \yshift=\z@ \captionwidth=\z@ - \Caption={}\captionedfalse - \linesabove =0 \picturedefault } -\def\plot{\pl@t \selfcaptionedfalse } -\def\Picture#1{\gl@bal\advance\figurecount by 1 - \xdef#1{\the\figurecount}\pl@t \selfcaptionedtrue } -\def\picture{\Picture\?} -% -\def\s@vepicture{\iffileexists \parsefilename \redopicturebox \fi - \ifdim\captionwidth>\z@ \else \captionwidth=\p@cwd \fi - \xdef\lastpicture{\iffileexists - \setbox0=\hbox{\raise\the\yshift \vbox{% - \moveright\the\xshift\hbox{\picturedefinition}}}% - \else \setbox0=\hbox{}\fi - \ht0=\the\p@cht \wd0=\the\p@cwd \dp0=\the\p@cdp - \vbox{\hsize=\the\captionwidth \line{\hss\box0 \hss }% - \ifcaptioned \vskip\the\captionskip \noexpand\Tenpoint - \ifselfcaptioned Figure~\the\figurecount.\enspace \fi - \the\Caption \fi }}% - \endgroup } -% -\let\endpicture=\s@vepicture -\def\savepicture#1{\s@vepicture \global\let#1=\lastpicture } -\def\displaypicture{\fullwidth \s@vepicture $$\lastpicture $${}} -\def\toppicture{\fullwidth \s@vepicture \topinsert - \lastpicture \medskip \endinsert } -\def\midpicture{\fullwidth \s@vepicture \midinsert - \lastpicture \endinsert } -% -% Wraparound macros - a try. -% -\def\leftpicture{\pres@tpicture - \dimen@i=\hsize \advance\dimen@i by -\dimen@ii - \setbox\picturebox=\hbox to \hsize {\box0 \hss }% - \wr@paround } -\def\rightpicture{\pres@tpicture - \dimen@i=\z@ - \setbox\picturebox=\hbox to \hsize {\hss \box0 }% - \wr@paround } -% -\def\pres@tpicture{\gl@bal\linesabove=\linesabove - \s@vepicture \setbox\picturebox=\vbox{ - \kern \linesabove\baselineskip \kern 0.3\baselineskip - \lastpicture \kern 0.3\baselineskip }% - \dimen@=\p@cht \dimen@i=\dimen@ - \advance\dimen@i by \pagetotal - \par \ifdim\dimen@i>\pagegoal \vfil\break \fi - \dimen@ii=\hsize - \advance\dimen@ii by -\parindent \advance\dimen@ii by -\p@cwd - \setbox0=\vbox to\z@{\kern-\baselineskip \unvbox\picturebox \vss }} -\def\wr@paround{\Caption={}\count255=1 - \loop \ifnum \linesabove >0 - \advance\linesabove by -1 \advance\count255 by 1 - \advance\dimen@ by -\baselineskip - \expandafter\Caption \expandafter{\the\Caption \z@ \hsize }% - \repeat - \loop \ifdim \dimen@ >\z@ - \advance\count255 by 1 \advance\dimen@ by -\baselineskip - \expandafter\Caption \expandafter{% - \the\Caption \dimen@i \dimen@ii }% - \repeat - \edef\n@xt{\parshape=\the\count255 \the\Caption \z@ \hsize }% - \par\noindent \n@xt \strut \vadjust{\box\picturebox }} -% -\let\picturedefault=\relax -\let\parsefilename=\relax -\def\redopicturebox{\let\picturedefinition=\rel@x - \errhelp=\disabledpictures - \errmessage{This version of TeX cannot handle pictures. Sorry.}} -\newhelp\disabledpictures - {You will get a blank box in place of your picture.} -% -% -% -% Above definitions of \parsefilename and \redopicturebox -% are dumb defaults. Actual definition are system dependent; -% you will probably find them in your PHYZZX.LOCAL file. -% -% The example below is used at Princeton. -% -%\def\parsefilename{\expandafter\p@rse\the\picfilename.\endp@rse } -%\def\p@rse#1.#2\endp@rse{\if"#2"\expandafter\picfilename -% \expandafter{\the\picfilename.fig}\fi } -% -%\newread\pictureread -%\def\redopicturebox{\expandafter\openin\expandafter\pictureread -% \the\picfilename -% \ifeof\pictureread \errhelp=\disabledpictures -% \edef\n@xt{\errmessage={Cannot find file \the\picfilename}\n@xt -% \let\pictureboxdefinition=\relax \else -% \read\pictureread to\y@p \read\pictureread to\y@p -% \read\pictureread to\x@p \read\pictureread to\y@m -% \read\pictureread to\x@m \closein\pictureread -% \p@cht=\y@p truein \advance\p@cht by -\y@m truein -% \advance\yshift by \y@p truein -% \p@cwd=\x@p truein \advance\p@cwd by -\x@m truein -% \advance\xshift by \x@m truein -% \edef\picturedefinition{\special{pos,inc=\the\picfilename}}% -% \fi } -% -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Here come macros for memos & letters. -% -\def\FRONTPAGE{\ifvoid255\else\vfill\penalty-20000\fi - \gl@bal\pagenumber=1 \gl@bal\chapternumber=0 - \gl@bal\equanumber=0 \gl@bal\sectionnumber=0 - \gl@bal\referencecount=0 \gl@bal\figurecount=0 - \gl@bal\tablecount=0 \gl@bal\frontpagetrue - \gl@bal\lastf@@t=0 \gl@bal\footsymbolcount=0 - \gl@bal\cn@@false } -\let\Frontpage=\FRONTPAGE -% -\def\papers{\papersize\headline=\paperheadline\footline=\paperfootline} -% -\def\papersize{\hsize=35pc \vsize=50pc \hoffset=0pc \voffset=1pc - \advance\hoffset by\HOFFSET \advance\voffset by\VOFFSET - \pagebottomfiller=0pc - \skip\footins=\bigskipamount \normalspace } -% -\papers % This is the default -% -% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -% -\newskip\lettertopskip \lettertopskip=20pt plus 50pt -\newskip\letterbottomskip \letterbottomskip=\z@ plus 100pt -\newskip\signatureskip \signatureskip=40pt plus 3pt -% -\def\lettersize{\hsize=6.5in \vsize=8.5in \hoffset=0in \voffset=0.5in - \advance\hoffset by\HOFFSET \advance\voffset by\VOFFSET - \pagebottomfiller=\letterbottomskip - \skip\footins=\smallskipamount \multiply\skip\footins by 3 - \singlespace } -% -\def\MEMO{\lettersize \headline=\letterheadline \footline={\hfil }% - \let\rule=\memorule \FRONTPAGE \memohead } -\let\memo=\MEMO -\def\memodate{\afterassignment\MEMO \date } -% -\def\memit@m#1{\smallskip \hangafter=0 \hangindent=1in - \Textindent{\caps #1}} -\def\subject{\memit@m{Subject:}} -\def\topic{\memit@m{Topic:}} -\def\from{\memit@m{From:}} -\def\to{\rel@x \ifmmode \rightarrow \else \memit@m{To:}\fi } -\def\memorule{\medskip\hrule height 1pt\bigskip} % default definitions -\def\memohead{\centerline{\fourteenrm MEMORANDUM}}% see phyzzx.local -% -\newwrite\labelswrite -\newtoks\rw@toks -\def\letters{\lettersize - \headline=\letterheadline \footline=\letterfootline - \immediate\openout\labelswrite=\jobname.lab} -\def\letter{\FRONTPAGE \letterhead \addressee } -\let\letterhead=\rel@x -% -\def\addressee#1{\medskip\line{\hskip 0.75\hsize plus\z@ minus 0.25\hsize - \the\date \hfil }% - \vskip \lettertopskip - \ialign to\hsize{\strut ##\hfil\tabskip 0pt plus \hsize \crcr #1\crcr} - \writelabel{#1}\medskip \noindent\hskip -\spaceskip \ignorespaces } -% -\def\rwl@begin#1\cr{\rw@toks={#1\crcr}\rel@x - \immediate\write\labelswrite{\the\rw@toks}\futurelet\n@xt\rwl@next} -\def\rwl@next{\ifx\n@xt\rwl@end \let\n@xt=\rel@x - \else \let\n@xt=\rwl@begin \fi \n@xt} -\let\rwl@end=\rel@x -\def\writelabel#1{\immediate\write\labelswrite{\noexpand\labelbegin} - \rwl@begin #1\cr\rwl@end - \immediate\write\labelswrite{\noexpand\labelend}} -% -\newtoks\FromAddress \FromAddress={} -\newtoks\sendername \sendername={} -\newbox\FromLabelBox -\newdimen\labelwidth \labelwidth=6in -% -\def\makelabels{\afterassignment\Makelabels \sendername=} -\def\Makelabels{\FRONTPAGE \letterinfo={\hfil } \MakeFromBox - \immediate\closeout\labelswrite \input \jobname.lab\vfil\eject} -\let\labelend=\rel@x -\def\labelbegin#1\labelend{\setbox0=\vbox{\ialign{##\hfil\cr #1\crcr}} - \MakeALabel } -% -\def\MakeFromBox{\gl@bal\setbox\FromLabelBox=\vbox{\Tenpoint - \ialign{##\hfil\cr \the\sendername \the\FromAddress \crcr }}} -\def\MakeALabel{\vskip 1pt \hbox{\vrule \vbox{ - \hsize=\labelwidth \hrule\bigskip - \leftline{\hskip 1\parindent \copy\FromLabelBox}\bigskip - \centerline{\hfil \box0 } \bigskip \hrule - }\vrule } \vskip 1pt plus 1fil } -% -\def\signed#1{\par \nobreak \bigskip \dt@pfalse \begingroup - \everycr={\noalign{\nobreak - \ifdt@p\vskip\signatureskip\gl@bal\dt@pfalse\fi }}% - \tabskip=0.5\hsize plus \z@ minus 0.5\hsize - \halign to\hsize {\strut ##\hfil\tabskip=\z@ plus 1fil minus \z@\crcr - \noalign{\gl@bal\dt@ptrue}#1\crcr }% - \endgroup \bigskip } -% -\def\copies{\par\hang\textindent{\tenrm cc:}} -\def\endletter{\par \iffrontpage \else \vfil \fi \supereject } -% -\newbox\letterb@x -\def\lettertext{\par \vskip\parskip \unvcopy\letterb@x \par } -\def\multiletter{\setbox\letterb@x=\vbox\bgroup - \everypar{\vrule height 1\baselineskip depth 0pt width 0pt } - \singlespace \topskip=\baselineskip } -\def\letterend{\par\egroup} -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Here come macros for title pages. -% -\newskip\frontpageskip -\newtoks\Pubnum \let\pubnum=\Pubnum -\newtoks\Pubtype \let\pubtype=\Pubtype -\newif\ifp@bblock \p@bblocktrue -% -\def\PH@SR@V{\doubl@true \baselineskip=24.1pt plus 0.2pt minus 0.1pt - \parskip= 3pt plus 2pt minus 1pt } -\def\PHYSREV{\papers\PhysRevtrue\PH@SR@V} -\let\physrev=\PHYSREV -\def\titlepage{\FRONTPAGE\papers\ifPhysRev\PH@SR@V\fi - \ifp@bblock\p@bblock \else\hrule height\z@ \rel@x \fi } -\def\nopubblock{\p@bblockfalse} -\def\endpage{\vfil\break} -% -\frontpageskip=12pt plus .5fil minus 2pt -\Pubtype={} -\Pubnum={} -% -\def\p@bblock{\begingroup \tabskip=\hsize minus \hsize - \baselineskip=1.5\ht\strutbox \topspace-2\baselineskip - \halign to\hsize{\strut ##\hfil\tabskip=0pt\crcr - \the\Pubnum\crcr\the\date\crcr\the\pubtype\crcr}\endgroup} -% -\def\title#1{\vskip\frontpageskip \titlestyle{#1} \vskip\headskip } -% -\def\author#1{\vskip\frontpageskip\titlestyle{\twelvecp #1}\nobreak} -\def\andauthor{\vskip\frontpageskip\centerline{and}\author} -\def\authors{\vskip\frontpageskip\noindent} -% -\def\address#1{\par\kern 5pt\titlestyle{\twelvepoint\it #1}} -\def\andaddress{\par\kern 5pt \centerline{\sl and} \address} -\def\SLAC{\address{Stanford Linear Accelerator Center\break - Stanford University, Stanford, California~94309}} -\def\JHL{\address{Joseph Henry Laboratories\break - Princeton University\break Princeton, New Jersey 08544}} -% -\def\abstract{\par\dimen@=\prevdepth \hrule height\z@ \prevdepth=\dimen@ - \vskip\frontpageskip\centerline{\fourteenrm ABSTRACT}\vskip\headskip } -\def\submit#1{\par\nobreak\vfil\nobreak\medskip - \centerline{Submitted to \sl #1}} -% -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Miscellaneous macros -% -\def\ie{\hbox{\it i.e.}} \def\etc{\hbox{\it etc.}} -\def\eg{\hbox{\it e.g.}} \def\cf{\hbox{\it cf.}} -\def\etal{\hbox{\it et al.}} \def\dash{\hbox{---}} -\def\\{\rel@x \ifmmode \backslash \else {\tt\char`\\}\fi } -% -\def\sequentialequations{\rel@x \if\equanumber<0 \else - \gl@bal\equanumber=-\equanumber \gl@bal\advance\equanumber by -1 \fi } -% -\def\nextline{\unskip\nobreak\hfill\break} -\let\brk=\nextline -\def\subpar{\unskip\nobreak\vadjust{\allowbreak\vskip\parskip}% - \hskip\parfillskip\break} -% -\def\journal#1(#3){\begingroup \let\journal=\dummyj@urnal - \unskip, \sl #1\unskip~\bf\ignorespaces #2\rm - (\afterassignment\j@ur \count255=#3), \endgroup\ignorespaces } -\def\j@ur{\ifnum\count255<100 \advance\count255 by 1900 \fi - \number\count255 } -\def\dummyj@urnal{% - \toks@={Reference foul up: nested \journal macros}% - \errhelp={Your forgot & or ( ) after the last \journal}% - \errmessage{\the\toks@ }} -% -\def\cropen#1{\crcr\noalign{\vskip #1}} -\def\crr{\cropen{3\jot }} -\def\topspace{\hrule height 0pt depth 0pt \vskip} -% -\def\coeff#1#2{{\textstyle{#1\over #2}}} -\def\half{\coeff12 } -\def\partder#1#2{{\partial #1\over\partial #2}} -\def\Buildrel#1\under#2{\mathrel{\mathop{#2}\limits_{#1}}} -% -\def\becomes#1{\mathchoice{\becomes@\scriptstyle{#1}} - {\becomes@\scriptstyle{#1}} {\becomes@\scriptscriptstyle{#1}} - {\becomes@\scriptscriptstyle{#1}}} -\def\becomes@#1#2{\mathrel{\setbox0=\hbox{$\m@th #1{\,#2\,}$}% - \mathop{\hbox to \wd0 {\rightarrowfill}}\limits_{#2}}} -% -\def\bra#1{\left\langle #1\right|} -\def\ket#1{\left| #1\right\rangle} -\def\braket#1#2{\VEV{#1 | #2}} -\def\VEV#1{\left\langle #1\right\rangle} -\let\vev=\VEV -% -\def\Tr{\mathop{\rm Tr}\nolimits} -\def\tr{\mathop{\rm tr}\nolimits} -\let\int=\intop \let\oint=\ointop -% -\def\lsim{\mathrel{\mathpalette\@versim<}} -\def\gsim{\mathrel{\mathpalette\@versim>}} -\def\@versim#1#2{\vcenter{\offinterlineskip - \ialign{$\m@th#1\hfil##\hfil$\crcr#2\crcr\sim\crcr } }} -% -\def\big#1{{\hbox{$\left#1\vbox to 0.85\b@gheight{}\right.\n@space$}}} -\def\Big#1{{\hbox{$\left#1\vbox to 1.15\b@gheight{}\right.\n@space$}}} -\def\bigg#1{{\hbox{$\left#1\vbox to 1.45\b@gheight{}\right.\n@space$}}} -\def\Bigg#1{{\hbox{$\left#1\vbox to 1.75\b@gheight{}\right.\n@space$}}} -% -\def\){\mskip 2mu\nobreak } -% -% % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % % -% -% Finally, some bug fixings. -% -\let\sec@nt=\sec -\def\sec{\rel@x\ifmmode\let\n@xt=\sec@nt\else\let\n@xt\section\fi\n@xt} -% -\def\obsolete#1{\message{Macro \string #1 is obsolete.}} -% -\def\firstsec#1{\obsolete\firstsec \section{#1}} -\def\firstsubsec#1{\obsolete\firstsubsec \subsection{#1}} -\def\thispage#1{\obsolete\thispage \gl@bal\pagenumber=#1\frontpagefalse} -\def\thischapter#1{\obsolete\thischapter \gl@bal\chapternumber=#1} -\def\splitout{\obsolete\splitout\rel@x} -\def\prop{\obsolete\prop \propto } -% -\def\nextequation#1{\obsolete\nextequation \gl@bal\equanumber=#1 - \ifnum\the\equanumber>0 \gl@bal\advance\equanumber by 1 \fi} -% -\def\BOXITEM{\afterassigment\B@XITEM\setbox0=} -\def\B@XITEM{\par\hangindent\wd0 \noindent\box0 } -% -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% That's about it -% -\def\phyzzx{PHY\setbox0=\hbox{Z}\copy0 \kern-0.5\wd0 \box0 X} -\def\fmtname{phyzzx} \def\fmtversion{0.94} -\everyjob{\xdef\today{\monthname~\number\day, \number\year} - \input myphyx.tex } -\message{ by V.K.} -% -\input phyzzx.local -\catcode`\@=12 % at signs are no longer letters -% |