%% %% This is file `feyn.sty', %% generated with the docstrip utility. %% %% The original source files were: %% %% feyn.dtx (with options: `package') %% Feyn: package to manage the font feyn10 %% This software is copyright, 1991, 1994, 2001, 2002, 2005, 2008, 2009 Norman Gray. %% %% This program is free software; you can redistribute it and/or %% modify it under the terms of the GNU General Public License %% as published by the Free Software Foundation; either version 2 %% of the License, or (at your option) any later version. %% %% This program is distributed in the hope that it will be useful, %% but WITHOUT ANY WARRANTY; without even the implied warranty of %% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the %% GNU General Public License for more details. %% %% You should have received a copy of the GNU General Public License %% along with this program; if not, write to the Free Software %% Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. %% %% Author: Norman Gray, norman@astro.gla.ac.uk. %% Department of Physics and Astronomy, University of Glasgow, UK %% %% See the file LICENCE for a copy of the GPL. %% You can also find an online copy at http://www.gnu.org/copyleft/gpl.html . %% VCS Info: Mercurial revision 204fc9a2e560, 2009-10-08 12:56 +0100 \NeedsTeXFormat{LaTeX2e} \ProvidesPackage{feyn}[2009/10/08 \space0.3.3\space textpos] \typeout{Package: `feyn' 0.3.3\space<2009/10/08 >} %% \CharacterTable %% {Upper-case \A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\X\Y\Z %% Lower-case \a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z %% Digits \0\1\2\3\4\5\6\7\8\9 %% Exclamation \! Double quote \" Hash (number) \# %% Dollar \$ Percent \% Ampersand \& %% Acute accent \' Left paren \( Right paren \) %% Asterisk \* Plus \+ Comma \, %% Minus \- Point \. Solidus \/ %% Colon \: Semicolon \; Less than \< %% Equals \= Greater than \> Question mark \? %% Commercial at \@ Left bracket \[ Backslash \\ %% Right bracket \] Circumflex \^ Underscore \_ %% Grave accent \` Left brace \{ Vertical bar \| %% Right brace \} Tilde \~} \newif\ifFeyn@globalbang \@ifpackageloaded{amsmath}{\Feyn@globalbangtrue}{\Feyn@globalbangfalse} \DeclareOption{globalbang}{\Feyn@globalbangtrue} \DeclareOption{noglobalbang}{\Feyn@globalbangfalse} \ProcessOptions \DeclareFontFamily{OMS}{feyn}{\skewchar\font'000} \DeclareFontShape{OMS}{feyn}{m}{n}{% <-10.5>feyn10% <10.5-11.5>feyn11% <11.5-15>feyn12% <15-21>feyn18% <21->feyn24% }{} \DeclareFontFamily{OMS}{textfeyn}{\skewchar\font'000} \DeclareFontShape{OMS}{textfeyn}{m}{n}{% <-10.5>feyntext10% <10.5-11.5>feyntext11% <11.5-15>feyntext12% <15-21>feyntext18% <21->feyntext24% }{} \DeclareSymbolFont{feynman}{OMS}{feyn}{m}{n} \DeclareSymbolFontAlphabet{\feyn@alphabet}{feynman} \DeclareSymbolFont{textfeynman}{OMS}{textfeyn}{m}{n} \DeclareSymbolFontAlphabet{\Feyn@alphabet}{textfeynman} \ifFeyn@globalbang \catcode`\!=\active \def!{\char`\!} % ! produces this character everywhere \def\feyn{\begingroup \let!\momentum % ...except within \feyn \feyn@} \def\Feyn{\begingroup \let!\momentum % ...or \Feyn \Feyn@} \else {\catcode`\!=\active % only make ! active within \feyn \gdef\feyn{% \begingroup % ends in \feyn@ \catcode`\!=\active \let!=\momentum \feyn@} \gdef\Feyn{% \begingroup % ends in \Feyn@ \catcode`\!=\active \let!=\momentum \Feyn@}} \fi \def\feyn@#1{\feyn@alphabet{#1}\endgroup} \def\Feyn@#1{\Feyn@alphabet{#1}\endgroup} \DeclareMathSymbol{\FeynSpaceChar}{\mathord}{feynman}{"7F} \setbox0=\hbox{$\FeynSpaceChar$} \newdimen\feyn@mfmodule \feyn@mfmodule=\wd0 \newdimen\feyn@module \feyn@module=2\wd0 \newdimen\feyn@maxis \feyn@maxis=\ht0 {\catcode`\!=\active \gdef\Diagram{% \begingroup % ends in \Diagram@ \catcode`\!=\active \let!\momentum \Diagram@}} \def\Diagram@#1{\setbox0=\hbox{\vbox{\offinterlineskip \let\\\cr \halign{&$\displaystyle\feyn{##}$\cr #1\crcr}}}% \@tempdima=\ht0 \advance\@tempdima by 2\feyn@maxis \ht0=\@tempdima \vcenter{\box0}% \endgroup}% end group begun in \Diagram \def\maxis#1{\raise\feyn@maxis \hbox{$#1$}} \newdimen\feyn@nudge \feyn@nudge=\feyn@mfmodule \divide\feyn@nudge by 3 \def\feyn@pos@top#1#2#3{% top \leavevmode \@tempdima=#2\feyn@mfmodule \advance\@tempdima\feyn@nudge \setbox1=\hbox{\raise \@tempdima\hbox to 0pt{% \hskip #1\feyn@mfmodule \hbox to 0pt{\hss$\scriptstyle #3$\hss}\hss}}% \ht1=0pt \dp1=0pt \box1} \def\feyn@pos@urt#1#2#3{% urt \leavevmode \@tempdima=#2\feyn@mfmodule \advance\@tempdima\feyn@nudge \setbox1=\hbox{\raise \@tempdima\hbox to 0pt{% \hskip #1\feyn@mfmodule \hskip\feyn@nudge $\scriptstyle #3$\hss}}% \ht1=0pt \dp1=0pt \box1} \def\feyn@pos@lrt#1#2#3{% lrt \leavevmode \setbox0=\hbox to 0pt{\hskip\feyn@nudge $\scriptstyle #3$\hss}% \@tempdima=#2\feyn@mfmodule \advance\@tempdima -\ht0 \advance\@tempdima-\feyn@nudge \setbox1=\hbox{\raise \@tempdima\hbox to 0pt{% \hskip #1\feyn@mfmodule \box0\hss}}% \ht1=0pt \dp1=0pt \box1} \def\feyn@pos@bot#1#2#3{% bot \leavevmode \setbox0=\hbox to 0pt{\hss$\scriptstyle #3$\hss}% \@tempdima=#2\feyn@mfmodule \advance\@tempdima -\ht0 \advance\@tempdima-\feyn@nudge \setbox1=\hbox{\raise \@tempdima\hbox to 0pt{% \hskip #1\feyn@mfmodule \box0\hss}}% \ht1=0pt \dp1=0pt \box1} \def\feyn@pos@llft#1#2#3{% llft \leavevmode \setbox0=\hbox to 0pt{\hss$\scriptstyle #3$\hskip\feyn@nudge}% \@tempdima=#2\feyn@mfmodule \advance\@tempdima -\ht0 \advance\@tempdima-\feyn@nudge \setbox1=\hbox{\raise \@tempdima\hbox to 0pt{% \hskip #1\feyn@mfmodule \box0\hss}}% \ht1=0pt \dp1=0pt \box1} \def\feyn@pos@ulft#1#2#3{% ulft \leavevmode \@tempdima=#2\feyn@mfmodule \advance\@tempdima\feyn@nudge \setbox1=\hbox{\raise \@tempdima\hbox to 0pt{% \hskip #1\feyn@mfmodule \hbox to 0pt{\hss$\scriptstyle #3$\hskip\feyn@nudge}\hss}}% \ht1=0pt \dp1=0pt \box1} \def\feyn@annotation#1#2#3#4{% \expandafter\def\csname feyn@ann@#1\endcsname##1{% \csname feyn@pos@\ifx\@tempa\@empty #4\else\@tempa\fi\endcsname {#2}{#3}{##1}% #1}} \feyn@annotation{f}{0.99974}{0.35}{top}% "f" \feyn@annotation{fA}{0.99974}{0.35}{top}% "F" \feyn@annotation{fV}{0.99974}{0.35}{top}% 6 \feyn@annotation{fu}{0.70692}{0.95692}{ulft}% "e" \feyn@annotation{fuA}{0.70692}{0.95692}{ulft}% "E" \feyn@annotation{fuV}{0.70692}{0.95692}{ulft}% 5 \feyn@annotation{fd}{0.70692}{0.95692}{urt}% "d" \feyn@annotation{fdA}{0.70692}{0.95692}{urt}% "D" \feyn@annotation{fdV}{0.70692}{0.95692}{urt}% 4 \feyn@annotation{fv}{0}{1.24974}{urt}% "b" \feyn@annotation{fvA}{0}{1.24974}{urt}% "B" \feyn@annotation{fvV}{0}{1.24974}{urt}% 2 \feyn@annotation{m}{0.99974}{0.32802}{top}% "m" \feyn@annotation{mA}{0.99974}{0.32802}{top}% "M" \feyn@annotation{mV}{0.99974}{0.32802}{top}% 13 \feyn@annotation{ms}{0.49986}{0.32802}{top}% 11 \feyn@annotation{fl}{0}{1.85}{top}% "l" \feyn@annotation{flA}{0}{1.85}{top}% "L" \feyn@annotation{flV}{0}{1.85}{top}% 12 \feyn@annotation{flu}{0}{-1.35}{bot}% "n" \feyn@annotation{fluA}{0}{-1.35}{bot}% "N" \feyn@annotation{fluV}{0}{-1.35}{bot}% 14 \feyn@annotation{flS}{0}{1.23335}{top}% "o" \feyn@annotation{flSA}{0}{1.23335}{top}% "O" \feyn@annotation{flSV}{0}{1.23335}{top}% 15 \feyn@annotation{flSu}{0}{-0.90001}{bot}% "w" \feyn@annotation{flSuA}{0}{-0.90001}{bot}% "W" \feyn@annotation{flSuV}{0}{-0.90001}{bot}% 23 \feyn@annotation{g}{0.99974}{0.45}{top}% "g" \feyn@annotation{gA}{0.99974}{0.45}{top}% "G" \feyn@annotation{gV}{0.99974}{0.45}{top}% 7 \feyn@annotation{gu}{0.70692}{0.95692}{ulft}% "u" \feyn@annotation{guA}{0.70692}{0.95692}{ulft}% "U" \feyn@annotation{guV}{0.70692}{0.95692}{ulft}% 21 \feyn@annotation{gd}{0.70692}{0.95692}{urt}% "v" \feyn@annotation{gdA}{0.70692}{0.95692}{urt}% "V" \feyn@annotation{gdV}{0.70692}{0.95692}{urt}% 22 \feyn@annotation{gv}{0}{1.24974}{urt}% "}" \feyn@annotation{gvA}{0}{1.24974}{urt}% "]" \feyn@annotation{gvV}{0}{1.24974}{urt}% 29 \feyn@annotation{g1}{-1.41422}{1.66422}{ulft}% "q" \feyn@annotation{g1A}{-1.41422}{1.66422}{ulft}% "Q" \feyn@annotation{g1V}{-1.41422}{1.66422}{ulft}% 17 \feyn@annotation{g2}{1.41422}{1.66422}{urt}% "r" \feyn@annotation{g2A}{1.41422}{1.66422}{urt}% "R" \feyn@annotation{g2V}{1.41422}{1.66422}{urt}% 18 \feyn@annotation{g3}{1.41422}{-1.16422}{lrt}% "s" \feyn@annotation{g3A}{1.41422}{-1.16422}{lrt}% "S" \feyn@annotation{g3V}{1.41422}{-1.16422}{lrt}% 19 \feyn@annotation{g4}{-1.41422}{-1.16422}{llft}% "t" \feyn@annotation{g4A}{-1.41422}{-1.16422}{llft}% "T" \feyn@annotation{g4V}{-1.41422}{-1.16422}{llft}% 20 \feyn@annotation{gl}{0}{2.25}{urt}% "y" \feyn@annotation{glA}{0}{2.25}{urt}% "Y" \feyn@annotation{glV}{0}{2.25}{urt}% 25 \feyn@annotation{glu}{0}{-1.75}{llft}% "z" \feyn@annotation{gluA}{0}{-1.75}{llft}% "Z" \feyn@annotation{gluV}{0}{-1.75}{llft}% 26 \feyn@annotation{glB}{0}{2.91667}{urt}% "{" \feyn@annotation{glBA}{0}{2.91667}{urt}% "[" \feyn@annotation{glBV}{0}{2.91667}{urt}% 27 \feyn@annotation{glS}{0}{1.5833}{llft}% "|" \feyn@annotation{glSA}{0}{1.5833}{llft}% "\" \feyn@annotation{glSV}{0}{1.5833}{llft}% 28 \feyn@annotation{h}{0.99974}{0.25}{top}% "h" \feyn@annotation{hA}{0.99974}{0.25}{top}% "H" \feyn@annotation{hV}{0.99974}{0.25}{top}% 8 \feyn@annotation{hu}{0.70464}{0.95464}{ulft}% "i" \feyn@annotation{huA}{0.70464}{0.95464}{ulft}% "I" \feyn@annotation{huV}{0.70464}{0.95464}{ulft}% 9 \feyn@annotation{hd}{0.70464}{0.95464}{urt}% "j" \feyn@annotation{hdA}{0.70464}{0.95464}{urt}% "J" \feyn@annotation{hdV}{0.70464}{0.95464}{urt}% 10 \feyn@annotation{hs}{0.49986}{0.25}{top}% "K" \feyn@annotation{c}{0.65044}{0.90044}{top}% "c" \feyn@annotation{p}{0.65}{0.9}{top}% "p" \feyn@annotation{P}{0.65044}{0.90044}{top}% "P" \feyn@annotation{x}{0}{0.55641}{top}% "x" \def\momentum{\@ifnextchar[\momentum@{\momentum@[]}} \def\momentum@[#1]#2#3{% \def\@tempa{#1} \ifx\@tempa\@empty \else \@ifundefined{feyn@pos@#1} {\@latex@error{No annotation position #1}% {You cannot call \string\momentum[#1]{...}^^J(must be one of top, urt, lrt, bot, llft, ulft)}% #2}% \fi \@ifundefined{feyn@ann@#2}% {\@latex@error{No annotation defined for #2}% {You cannot call \string\momentum{#2}{...}}% #2}% {\csname feyn@ann@#2\endcsname{#3}}} \def\vertexlabel#1#2{\setbox0=\hbox to 0pt{\hss$\scriptstyle #2$\hss} \ifcat #1^ \vbox to 0pt{\vss\box0\nointerlineskip\kern2\feyn@maxis} \else\ifcat #1_ \vbox to 0pt{\kern\feyn@maxis\nointerlineskip\box0\vss} \else \PackageError{feyn} {Bad arguments for \string\vertexlabel} {Usage: \string\vertexlabel^{text} or \string\vertexlabel_{text}} \fi\fi } \def\annotate#1#2#3{\vcenter to 0pt{\vss \hbox to 0pt{\hskip #1\feyn@module\hbox to 0pt{\hss$\scriptstyle #3$\hss}\hss }\vskip #2\feyn@module}} \def\tannotate#1#2#3{\vcenter to 0pt{\vss \hbox to 0pt{\hskip #1\feyn@module\hbox to 0pt{\hss #3\hss}\hss }\vskip #2\feyn@module}} \def\feynstrut#1#2{\setbox\strutbox=\hbox{\vrule height #1\feyn@module depth #2\feyn@module width 0pt}} \def\arrow#1#2#3{\@latex@error{Do not use the \string\arrow macro any more}{}} \DeclareMathSymbol{\wfermion}{0}{feynman}{"64} \DeclareMathSymbol{\hfermion}{0}{feynman}{"6B} \DeclareMathSymbol{\shfermion}{0}{feynman}{"6C} \DeclareMathSymbol{\whfermion}{0}{feynman}{"6D} \DeclareMathSymbol{\gvcropped}{0}{feynman}{"07} \DeclareMathSymbol{\bigbosonloop}{0}{feynman}{"7B} \DeclareMathSymbol{\smallbosonloop}{0}{feynman}{"7C} \DeclareMathSymbol{\bigbosonloopA}{0}{feynman}{"5B} \DeclareMathSymbol{\smallbosonloopA}{0}{feynman}{"5C} \DeclareMathSymbol{\bigbosonloopV}{0}{feynman}{"1B} \DeclareMathSymbol{\smallbosonloopV}{0}{feynman}{"1C} \endinput %% %% End of file `feyn.sty'.