{VERSION 3 0 "DEC ALPHA UNIX" "3.0" }
{USTYLETAB {CSTYLE "Maple Input" -1 0 "Courier" 0 1 255 0 0 1 0 1 0 0 
1 0 0 0 0 }{CSTYLE "2D Math" -1 2 "Times" 0 1 0 0 0 0 0 0 2 0 0 0 0 0 
0 }{CSTYLE "2D Output" 2 20 "" 0 1 0 0 255 1 0 0 0 0 0 0 0 0 0 }
{PSTYLE "Normal" -1 0 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 
0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Text Output" -1 2 1 
{CSTYLE "" -1 -1 "Courier" 1 10 0 0 255 1 0 0 0 0 0 1 3 0 3 }1 0 0 -1 
-1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "Warning" 2 7 1 {CSTYLE "" -1 -1 "" 0 
1 0 0 255 1 0 0 0 0 0 0 1 0 0 }0 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }
{PSTYLE "Maple Output" 0 11 1 {CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 
0 0 0 0 0 }3 3 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }{PSTYLE "" 11 12 1 
{CSTYLE "" -1 -1 "" 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 }1 0 0 -1 -1 -1 0 0 
0 0 0 0 -1 0 }{PSTYLE "Maple Plot" 0 13 1 {CSTYLE "" -1 -1 "" 0 1 0 0 
0 0 0 0 0 0 0 0 0 0 0 }3 0 0 -1 -1 -1 0 0 0 0 0 0 -1 0 }}
{SECT 0 {EXCHG {PARA 0 "" 0 "" {TEXT -1 61 "Annihilation e^+e^ -->mu^+
m^- unter Benutzung von heppack.txt" }}{PARA 0 "" 0 "" {TEXT -1 63 "He
lizit\344tsindex der Amplituden in der Reihenfolge der Teilchen." }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 28 "restart:\nread `heppack.txt`;" }}
{PARA 7 "" 1 "" {TEXT -1 32 "Warning, new definition for norm" }}
{PARA 7 "" 1 "" {TEXT -1 33 "Warning, new definition for trace" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 43 "read `d:/maplev3/projekte/he
p/heppack.txt`;" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 48 "Definition der
 Vierervektoren in Pseudonotation:" }}{PARA 0 "" 0 "" {TEXT -1 69 "Wir
 rechnen den Querschnitt fuer verschwindende Elektronenmasse, aber" }}
{PARA 0 "" 0 "" {TEXT -1 23 "endliche Muonmasse aus." }}{PARA 0 "> " 
0 "" {MPLTEXT 1 0 15 "pe:=[Ee,0,0,0]:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 17 "ke:=[Ee,0,Pi,Pi]:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 19 "pa:=[Ee,M,theta,0]:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 23 "ka:=[Ee,M,Pi-theta,Pi]:" }}}{EXCHG {PARA 0 "" 0 "" 
{TEXT -1 61 "Die naechste Zeile beruecksichtigt konstante Faktoren und
 den" }}{PARA 0 "" 0 "" {TEXT -1 11 "Propagator." }}{PARA 0 "> " 0 "" 
{MPLTEXT 1 0 21 "fak:=-alpha*Pi/Ee/Ee:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 53 "T_rlrl:=dotprod(vbu(ke,1,pe,-1),ubv(pa,-1,ka,1))*fak:
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "t[1]:=combine(%,trig);
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"tG6#\"\"\",&*(%&alphaGF'%#PiG
F'-%$cosG6#%&thetaGF'\"\"%*&F*\"\"\"F+F2F0" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 52 "T_rlrr:=dotprod(vbu(ke,1,pe,-1),ubv(pa,1,ka,1))*fak
:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "t[2]:=combine(%);" }}
{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"tG6#\"\"#,$*&**%\"MG\"\"\"%&alpha
GF,%#PiGF,-%$sinG6#%&thetaGF,\"\"\"%#EeG!\"\"\"\"%" }}}{EXCHG {PARA 0 
"> " 0 "" {MPLTEXT 1 0 53 "T_rllr:=dotprod(vbu(ke,1,pe,-1),ubv(pa,1,ka
,-1))*fak:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "t[3]:=combine
(%,trig);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"tG6#\"\"$,&*&%&alpha
G\"\"\"%#PiGF+\"\"%*(F*\"\"\"F,F/-%$cosG6#%&thetaGF+!\"%" }}}{EXCHG 
{PARA 0 "> " 0 "" {MPLTEXT 1 0 53 "T_rll:=dotprod(vbu(ke,1,pe,-1),ubv(
pa,-1,ka,-1))*fak:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 22 "t[4]:
=combine(%,trig);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>&%\"tG6#\"\"%,$*
&**%\"MG\"\"\"%&alphaGF,%#PiGF,-%$sinG6#%&thetaGF,\"\"\"%#EeG!\"\"F'" 
}}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 65 "Alle anderen Amplituden verschw
inden, da der Elektronenstrom fuer" }}{PARA 0 "" 0 "" {TEXT -1 34 "gle
iche Helizitaeten verschwindet:" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "
vbu(ke,1,pe,1);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#7&\"\"!F$F$F$" }}}
{EXCHG {PARA 0 "" 0 "" {TEXT -1 69 "Jetzt die Quadratische Summe, die \+
Teilung durch 2 beruecksichtigt die" }}{PARA 0 "" 0 "" {TEXT -1 19 "8 \+
nicht berechneten" }}{PARA 0 "" 0 "" {TEXT -1 66 "Amplituden (die wege
n der Paritaetserhaltung aber gleich den schon" }}{PARA 0 "" 0 "" 
{TEXT -1 64 "berechneten sind) und den Faktor 1/4 von der Mittelung ue
ber die" }}{PARA 0 "" 0 "" {TEXT -1 20 "einlaufenden Spins.:" }}{PARA 
0 "" 0 "" {TEXT -1 0 "" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 31 "summe:=su
m(t[i]*t[i],i=1..4)/2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&summeG,(*
$),&*(%&alphaG\"\"\"%#PiGF+-%$cosG6#%&thetaGF+\"\"%*&F*\"\"\"F,F3F1\"
\"#F3#F+F4*&**)%\"MGF4F3)F*F4F3)F,F4F3)-%$sinGF/F4F3F3*$)%#EeG\"\"#F3!
\"\"\"#;*$),&F2F1F)!\"%F4F3F5" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 62 "
Es ist mit Maple nicht ganz einfach, eine bestimmte Form eines" }}
{PARA 0 "" 0 "" {TEXT -1 15 "Ausdrucks durch" }}{PARA 0 "" 0 "" {TEXT 
-1 69 "Vereinfachungen zu erzwingen. Wir moechten den Wirkungsquerschn
itt in" }}{PARA 0 "" 0 "" {TEXT -1 17 "einer Form haben," }}{PARA 0 "
" 0 "" {TEXT -1 67 "die die Modifikation des asymptotischen Querschnit
ts durch endliche" }}{PARA 0 "" 0 "" {TEXT -1 15 "Massen anzeigt." }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "sum1:=simplify(subs(M=0,summe));" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%sum1G,&*()%&alphaG\"\"#\"\"\")%#Pi
GF)F*)-%$cosG6#%&thetaGF)F*\"#;*&F'F*F+F*F2" }}}{EXCHG {PARA 0 "> " 0 
"" {MPLTEXT 1 0 19 "h1:=(4*alpha*Pi)^2:" }}}{EXCHG {PARA 0 "> " 0 "" 
{MPLTEXT 1 0 10 "h3:=h2/h1:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
54 "T_quadrat:=h1*(simplify(sum1/h1)+(M/Ee*sin(theta))^2);" }}{PARA 
11 "" 1 "" {XPPMATH 20 "6#>%*T_quadratG,$*()%&alphaG\"\"#\"\"\")%#PiGF
)F*,(*$)-%$cosG6#%&thetaGF)F*\"\"\"F4F4*&*&)%\"MGF)F*)-%$sinGF2F)F*F**
$)%#EeG\"\"#F*!\"\"F4F4\"#;" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 57 "Wi
r multiplizieren mit fak2, um vom Amplitudenquadrat zum" }}{PARA 0 "" 
0 "" {TEXT -1 27 "differentiellen Querschnitt" }}{PARA 0 "" 0 "" 
{TEXT -1 10 "zu kommen." }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 39 "fak2:=sq
rt(1-M^2/Ee^2)/64/Pi^2/4/Ee/Ee:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 
1 0 23 "s_diff:=fak2*T_quadrat;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'
s_diffG,$*&*(-%%sqrtG6#,&\"\"\"F,*&*$)%\"MG\"\"#\"\"\"F2*$)%#EeG\"\"#F
2!\"\"!\"\"F2)%&alphaGF1F2,(*$)-%$cosG6#%&thetaGF1F2F,F,F,*&*&F/F2)-%$
sinGF@F1F2F2*$)F5\"\"#F2F7F,F,F2*$)F5\"\"#F2F7#F,\"#;" }}}{EXCHG 
{PARA 0 "" 0 "" {TEXT -1 59 "Totaler Querschnitt durch Integration, da
nach wieder einige" }}{PARA 0 "" 0 "" {TEXT -1 12 "Umformungen:" }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "s_tot1:=2*Pi*int(T_quadrat*sin(thet
a),theta=0..Pi);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'s_tot1G,$*&*()%
#PiG\"\"$\"\"\",&*$)%#EeG\"\"#F+F0*$)%\"MGF0F+\"\"\"F4)%&alphaGF0F+F+*
$)F/\"\"#F+!\"\"#\"$G\"F*" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
18 "s_tot2:=expand(%);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'s_tot2G,&
*&)%#PiG\"\"$\"\"\")%&alphaG\"\"#F*#\"$c#F)*&*(F'F*F+F*)%\"MGF-F*F**$)
%#EeG\"\"#F*!\"\"#\"$G\"F)" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
25 "fak3:=256/3*Pi^3*alpha^2:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 
0 38 "s_tot3:=expand(simplify(s_tot2/fak3));" }}{PARA 11 "" 1 "" 
{XPPMATH 20 "6#>%'s_tot3G,&\"\"\"F&*&*$)%\"MG\"\"#\"\"\"F,*$)%#EeG\"\"
#F,!\"\"#F&F+" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 19 "s_tot:=%*f
ak2*fak3;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%&s_totG,$*&**,&\"\"\"F)
*&*$)%\"MG\"\"#\"\"\"F/*$)%#EeG\"\"#F/!\"\"#F)F.F)-%%sqrtG6#,&F)F)F*!
\"\"F/%#PiGF))%&alphaGF.F/F/*$)F2\"\"#F/F4#F)\"\"$" }}}{EXCHG {PARA 0 
"" 0 "" {TEXT -1 64 "Um die funktionale Abhaengigkeit an der Schwelle \+
und fuer grosse" }}{PARA 0 "" 0 "" {TEXT -1 22 "Energien zu studieren,
" }}{PARA 0 "" 0 "" {TEXT -1 70 "setzen wir willkuerliche Zahlenwerte \+
ein. Wiederholen Sie die Rechnung" }}{PARA 0 "" 0 "" {TEXT -1 64 "mit \+
den richtigen Konstanten. Der Wirkungsquerschnitt muss in nb" }}{PARA 
0 "" 0 "" {TEXT -1 21 "angegeben werden. Wie" }}{PARA 0 "" 0 "" {TEXT 
-1 56 "lautet die Formel fuer grosse Energien? Fuehren Sie dann" }}
{PARA 0 "" 0 "" {TEXT -1 69 "die ganze Rechnung (soweit Sie kommen) fu
er endliche Elektronenmassen" }}{PARA 0 "" 0 "" {TEXT -1 6 "durch." }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 32 "func:=subs(alpha=1,M=0.1,s_tot);" }
}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%%funcG,$*&*(,&\"\"\"F)*&\"\"\"F+*$)
%#EeG\"\"#F+!\"\"$\"+++++]!#7F)-%%sqrtG6#,&F)F)F*$!\"\"!\"#F+%#PiGF)F+
*$)F.\"\"#F+F0#F)\"\"$" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 26 "p
lot(func*Ee^2,Ee=0.1..1);" }}{PARA 13 "" 1 "" {INLPLOT "6%-%'CURVESG6$
7hn7$$\"31+++++++5!#=$\"3`KBnqG5b;!#D7$$\"34v$4'\\/815F*$\"3Ep34EUOC<F
*7$$\"37](=#**3E75F*$\"3`nALh\"fyT#F*7$$\"3:D\"G)[8R=5F*$\"3A,()Gh3JOH
F*7$$\"30+vV)z@X-\"F*$\"3\"3JRA`&GiLF*7$$\"3(*\\il(p#yO5F*$\"3e,]+0Me]
SF*7$$\"3/+](ofV!\\5F*$\"3p*\\r'G3B-YF*7$$\"3.+DJ&RlN2\"F*$\"3>CJ%=')*
\\iaF*7$$\"3-++v$>(3)4\"F*$\"3UII(RVj,7'F*7$$\"3,+]i!zIr9\"F*$\"3d`s1C
k^!3(F*7$$\"3******\\(Quh>\"F*$\"37*G0JxKVv(F*7$$\"3))*\\7.`>:G\"F*$\"
3N$*3oAjvU&)F*7$$\"3/+]7tY'oO\"F*$\"3*)H))p!*Hl\\!*F*7$$\"3;+v=7U%GY\"
F*$\"3))))=M-f()G%*F*7$$\"3+++D^P#)e:F*$\"3Wp/UiE='o*F*7$$\"3!****\\(e
_0_<F*$\"3*G`7+f6$****F*7$$\"3z**\\iq$oV%>F*$\"3qi!=_3go,\"!#<7$$\"3))
**\\7VsmA@F*$\"3\"f')e))*G@E5Fhp7$$\"3%***\\7)R&G2BF*$\"32b%G%)RoB.\"F
hp7$$\"33+]7ex@)\\#F*$\"3U#)*)RlG_O5Fhp7$$\"31+]i&zP&)o#F*$\"3oz>-^]IR
5Fhp7$$\"3B++]Z`I%)GF*$\"3k2o(oSz7/\"Fhp7$$\"3p***\\P^Pn0$F*$\"3'G&=5$
fGD/\"Fhp7$$\"30++]#Hb3D$F*$\"3(G.^o<kN/\"Fhp7$$\"3%*****\\P,xXMF*$\"3
u;]H[)HV/\"Fhp7$$\"3.++]2ngLOF*$\"3pzl#)*R&)[/\"Fhp7$$\"3I+]73.=/QF*$
\"3&G!QnSvFX5Fhp7$$\"3g****\\<)3q+%F*$\"3>XRx%\\Tc/\"Fhp7$$\"3E+++q6$)
yTF*$\"3jF!*\\pV)e/\"Fhp7$$\"3;+]789qyVF*$\"3F.FO],6Y5Fhp7$$\"3I*****
\\W?cb%F*$\"3,o9$*f2FY5Fhp7$$\"3>+]7j'G(\\ZF*$\"3$*ea4rUTY5Fhp7$$\"3n+
]P*elX$\\F*$\"3E$y][&f_Y5Fhp7$$\"3]++DJNUF^F*$\"3t(G;%R?iY5Fhp7$$\"3H+
]iDt_/`F*$\"3eUa'\\c&pY5Fhp7$$\"3Z***\\Ppdb\\&F*$\"3'>$G[p@wY5Fhp7$$\"
3E**\\7eX)Rp&F*$\"3!4/8E0?o/\"Fhp7$$\"3?**\\(os:n'eF*$\"3FKA9!zio/\"Fh
p7$$\"3_***\\77qK0'F*$\"3+a^_mB!p/\"Fhp7$$\"3o*****\\1**fC'F*$\"3rE*\\
\\HPp/\"Fhp7$$\"3t***\\itYXV'F*$\"3&H@s4gmp/\"Fhp7$$\"3^**\\7.j(ph'F*$
\"3&f))e\"G6*p/\"Fhp7$$\"3?***\\PBL&>oF*$\"3(p3,]m9q/\"Fhp7$$\"3#*)***
*\\kR:+(F*$\"3h[sX9I.Z5Fhp7$$\"3%*****\\P.(e>(F*$\"3d'oOa8]q/\"Fhp7$$
\"3P**\\7GG'>P(F*$\"3^J@=lP1Z5Fhp7$$\"3H++]K%yWc(F*$\"3AcW96p2Z5Fhp7$$
\"3R**\\781iXxF*$\"39xWpOy3Z5Fhp7$$\"3n**\\i&Qm\\$zF*$\"3#H!QMmz4Z5Fhp
7$$\"3&*)***\\(['3?\")F*$\"3$R.(ojn5Z5Fhp7$$\"39**\\7y+*QJ)F*$\"33ua0d
\\6Z5Fhp7$$\"3n******pfa+&)F*$\"3h,[/#*>7Z5Fhp7$$\"33++vy&G9p)F*$\"3r'
zL$G%Gr/\"Fhp7$$\"3_+]7$eI2)))F*$\"3'eIy\"[T8Z5Fhp7$$\"3a*****\\YzY0*F
*$\"3-,`A\"*)Qr/\"Fhp7$$\"3P***\\P^WSD*F*$\"3>o))e%zVr/\"Fhp7$$\"3L***
****)*eBV*F*$\"39u'oIvZr/\"Fhp7$$\"3@+]78%zCi*F*$\"3$yw!R!e^r/\"Fhp7$$
\"3J**\\(o\"*[W!)*F*$\"3>iW40\\:Z5Fhp7$$\"\"\"\"\"!$\"3Ayuk\\\"er/\"Fh
p-%'COLOURG6&%$RGBG$\"#5!\"\"F^^lF^^l-%+AXESLABELSG6$Q#Ee6\"%!G-%%VIEW
G6$;$F]^lFg^lF\\^l%(DEFAULTG" 2 281 281 281 2 0 1 0 2 9 0 4 2 
1.000000 45.000000 45.000000 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 
0 0 0 2 0 0 0 0 0 0 }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 67 "Jetzt unter
suchen wir die Vernichtung von Elektonen und Positronen," }}{PARA 0 "
" 0 "" {TEXT -1 66 "die beide senkrecht zur Streuebene polarisiert sin
d.. Verinfachend" }}{PARA 0 "" 0 "" {TEXT -1 14 "fuer masselose" }}
{PARA 0 "" 0 "" {TEXT -1 62 "Elektronen und Muonen.  Dazu muss man die
 beiden verbleibenden" }}{PARA 0 "" 0 "" {TEXT -1 21 "Helizitaetsampli
tuden" }}{PARA 0 "" 0 "" {TEXT -1 45 "mit dem Gewichtsfaktor 1/2 addie
ren (Warum??)" }}{PARA 0 "> " 0 "" {MPLTEXT 1 0 15 "pe:=[Ee,0,0,0]:" }
}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 17 "ke:=[Ee,0,Pi,Pi]:" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 21 "pa:=[Ee,0,theta,phi]:" }}}
{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 27 "ka:=[Ee,0,Pi-theta,Pi+phi]:
" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 51 "T_rlrl:=dotprod(vbu(ke,
1,pe,-1),ubv(pa,-1,ka,1))/2;" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'T_r
lrlG*()%#EeG\"\"#\"\"\"),&-%$expG6#*&%\"IG\"\"\"%&thetaGF1F1F1F1F(F)-F
-6#,$*&F0F),(%#PiGF1%$phiGF1F2F1F1!\"\"F1" }}}{EXCHG {PARA 0 "> " 0 "
" {MPLTEXT 1 0 51 "T_lrrl:=dotprod(vbu(ke,-1,pe,1),ubv(pa,-1,ka,1))/2;
" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#>%'T_lrrlG*&)%#EeG\"\"#\"\"\",(-%$
expG6#*&%\"IG\"\"\"%$phiGF0!\"#-F,6#*&F/F),&F1F0%&thetaGF0F0F0-F,6#,$*
&F/F),&F1!\"\"F7F0F0F=F0F0" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
18 "t3:=T_rlrl+T_lrrl:" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 34 "s
implify(evalc(t3*conjugate(t3)));" }}{PARA 12 "" 1 "" {XPPMATH 20 "6#,
fn**)%#EeG\"\"%\"\"\"-%$sinG6#,&%$phiG\"\"\"%&thetaGF.F.-%$cosG6#F/F.-
F*6#F-F.!\")*,F%F(-F1F+F.F0F(F)F(-F*F2F.F5*,F%F(F)F(F0F(F8F(-F1F4F.\"
\")**F%F(F)F(F8F(-F16#,&F-!\"\"F/F.F.!\"%**F%F(F7F(F8F(F)F(F5**F%F(F7F
(F8F(F3F(F;**F%F(F7F(F8F(-F*F>F.F'**F%F(F)F()F0\"\"#F(F3F(F5**F%F(F)F(
FGF(FEF(FA*,F%F(F)F(F0F(F8F(F=F(FA*,F%F(F7F(F0F(F8F(F3F(F;*,F%F(F7F(F0
F(F8F(FEF(F'**F%F(F)F(F8F(F:F(F;**F%F(F)F(F0F(FEF(FA**F%F(F7F(FGF(F:F(
F;**F%F(F7F(FGF(F=F(FA**F%F(F7F(F0F(F:F(F;**F%F(F7F(F0F(F=F(FA*$F%F(\"
#5*(F%F()F7FHF(FGF(F5*(F%F(F:F(F=F(FA*(F%F(F)F(F3F(FA*(F%F(F)F(FEF(!\"
#*(F%F(F3F(FEF(F'*(F%F(FVF(F0F(F5*(F%F(F7F(F:F(FA*(F%F(F7F(F=F(FH*&F%F
(FGF(F;*&F%F(F0F(\"#7" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 16 "co
mbine(%,trig);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,,*&)%#EeG\"\"%\"\"
\"-%$cosG6#,$%$phiG\"\"#\"\"\"F'*&F%F(-F*6#,&F-F.%&thetaGF.F/!\"#*&F%F
(-F*6#,&F4F.F-F5F/F5*$F%F(\"#7*&F%F(-F*6#,$F4F.F/F'" }}}{EXCHG {PARA 
0 "> " 0 "" {MPLTEXT 1 0 10 "expand(%);" }}{PARA 11 "" 1 "" {XPPMATH 
20 "6#,(*&)%#EeG\"\"%\"\"\")-%$cosG6#%$phiG\"\"#F(\"#;*(F%F()-F+6#%&th
etaGF.F(F)F(!#;*&F%F(F1F(F/" }}}{EXCHG {PARA 0 "> " 0 "" {MPLTEXT 1 0 
22 "simplify(%*fak*fak*2);" }}{PARA 11 "" 1 "" {XPPMATH 20 "6#,(*()%&a
lphaG\"\"#\"\"\")%#PiGF'F()-%$cosG6#%$phiGF'F(\"#K**F%F(F)F()-F-6#%&th
etaGF'F(F+F(!#K*(F%F(F)F(F2F(F0" }}}{EXCHG {PARA 0 "" 0 "" {TEXT -1 
50 "Der Faktor 2 beruecksichtigt die weitere moegliche" }}{PARA 0 "" 
0 "" {TEXT -1 47 "Helizitaetseinstellung der auslaufenden Muonen." }}
{PARA 0 "" 0 "" {TEXT -1 63 "Die gesamte Rechnung  zeigt, wie einfach \+
MAPLE auch  Ausdruecke" }}{PARA 0 "" 0 "" {TEXT -1 41 " mit komplexen \+
Zahlen beherrschbar macht." }}{PARA 0 "" 0 "" {TEXT -1 57 "Wir moechte
n den Querschnitt in einer Form haben, die den" }}{PARA 0 "" 0 "" 
{TEXT -1 39 "unpolarisierten Querschnitt als Summand" }}{PARA 0 "" 0 "
" {TEXT -1 49 "enthaelt. Leiten Sie diese Formel (per Hand?) ab." }}
{PARA 0 "> " 0 "" {MPLTEXT 1 0 0 "" }}}}{MARK "41 7 0" 0 }{VIEWOPTS 1 
1 0 1 1 1803 }