HEL: lagrangian.dat

File lagrangian.dat, 1.2 MB (added by Adam, 6 years ago)

Full Lagrangian as calculated by FeynRules

Line 
1lagr = -(c6*G0^2*MH^2)/16 - (c6*GP*GPbar*MH^2)/8 - (H^2*MH^2)/2 -
2    (c6*G0^6*MH^2)/(16*vev^4) - (3*c6*G0^4*GP*GPbar*MH^2)/(8*vev^4) -
3    (3*c6*G0^2*GP^2*GPbar^2*MH^2)/(4*vev^4) - (c6*GP^3*GPbar^3*MH^2)/
4     (2*vev^4) - (3*c6*G0^4*H^2*MH^2)/(16*vev^4) -
5    (3*c6*G0^2*GP*GPbar*H^2*MH^2)/(4*vev^4) - (3*c6*GP^2*GPbar^2*H^2*MH^2)/
6     (4*vev^4) - (3*c6*G0^2*H^4*MH^2)/(16*vev^4) -
7    (3*c6*GP*GPbar*H^4*MH^2)/(8*vev^4) - (c6*H^6*MH^2)/(16*vev^4) -
8    (39*c6^2*cH^5*H^6*MH^2)/(2048*vev^4) + (11*c6*cH^6*H^6*MH^2)/
9     (1024*vev^4) + (13*c6^2*cH^6*H^6*MH^2)/(8192*vev^4) -
10    (c6*cH^7*H^6*MH^2)/(1024*vev^4) - (3*c6*G0^4*H*MH^2)/(8*vev^3) -
11    (3*c6*G0^2*GP*GPbar*H*MH^2)/(2*vev^3) - (3*c6*GP^2*GPbar^2*H*MH^2)/
12     (2*vev^3) - (3*c6*G0^2*H^3*MH^2)/(4*vev^3) - (3*c6*GP*GPbar*H^3*MH^2)/
13     (2*vev^3) - (3*c6*H^5*MH^2)/(8*vev^3) - (39*c6^2*cH^5*H^5*MH^2)/
14     (2048*vev^3) + (3*c6*cH^6*H^5*MH^2)/(256*vev^3) -
15    (G0^4*MH^2)/(8*vev^2) + (c6*G0^4*MH^2)/(64*vev^2) -
16    (cH*G0^4*MH^2)/(8*vev^2) - (G0^2*GP*GPbar*MH^2)/(2*vev^2) +
17    (c6*G0^2*GP*GPbar*MH^2)/(16*vev^2) - (cH*G0^2*GP*GPbar*MH^2)/(2*vev^2) -
18    (GP^2*GPbar^2*MH^2)/(2*vev^2) + (c6*GP^2*GPbar^2*MH^2)/(16*vev^2) -
19    (cH*GP^2*GPbar^2*MH^2)/(2*vev^2) - (G0^2*H^2*MH^2)/(4*vev^2) -
20    (23*c6*G0^2*H^2*MH^2)/(32*vev^2) - (GP*GPbar*H^2*MH^2)/(2*vev^2) -
21    (23*c6*GP*GPbar*H^2*MH^2)/(16*vev^2) - (H^4*MH^2)/(8*vev^2) -
22    (47*c6*H^4*MH^2)/(64*vev^2) + (cH*H^4*MH^2)/(8*vev^2) -
23    (G0^2*H*MH^2)/(2*vev) + (c6*G0^2*H*MH^2)/(16*vev) -
24    (cH*G0^2*H*MH^2)/(4*vev) - (GP*GPbar*H*MH^2)/vev +
25    (c6*GP*GPbar*H*MH^2)/(8*vev) - (cH*GP*GPbar*H*MH^2)/(2*vev) -
26    (H^3*MH^2)/(2*vev) - (7*c6*H^3*MH^2)/(16*vev) + (cH*H^3*MH^2)/(4*vev) -
27    (c6*H*MH^2*vev)/8 + (MH^2*vev^2)/8 - (9*c6*MH^2*vev^2)/64 +
28    (cH*MH^2*vev^2)/8 + ee^2*GP*GPbar*A[Index[Lorentz, mu$1]]^2 -
29    (2*cT*ee^2*GP^2*GPbar^2*A[Index[Lorentz, mu$1]]^2)/vev^2 +
30    (2*cA*ee^4*GP*GPbar*vev^2*A[Index[Lorentz, mu$1]]^2)/MW^2 +
31    (2*cT*ee*GP*GPbar*H*A[Index[Lorentz, mu$1]]*
32      del[G0, Index[Lorentz, mu$1]])/vev^2 +
33    (2*cT*ee*GP*GPbar*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$1]])/
34     vev + del[G0, Index[Lorentz, mu$1]]^2/2 -
35    (cT*del[G0, Index[Lorentz, mu$1]]^2)/2 +
36    (cH*G0^2*del[G0, Index[Lorentz, mu$1]]^2)/(2*vev^2) -
37    (cT*H^2*del[G0, Index[Lorentz, mu$1]]^2)/(2*vev^2) -
38    (cT*H*del[G0, Index[Lorentz, mu$1]]^2)/vev +
39    I*ee*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$1]] -
40    ((2*I)*cT*ee*GP*GPbar^2*A[Index[Lorentz, mu$1]]*
41      del[GP, Index[Lorentz, mu$1]])/vev^2 +
42    (I*cA*ee^3*GPbar*vev^2*A[Index[Lorentz, mu$1]]*
43      del[GP, Index[Lorentz, mu$1]])/MW^2 +
44    (cH*G0*GPbar*del[G0, Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$1]])/
45     vev^2 + (I*cT*GPbar*H*del[G0, Index[Lorentz, mu$1]]*
46      del[GP, Index[Lorentz, mu$1]])/vev^2 +
47    (I*cT*GPbar*del[G0, Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$1]])/
48     vev + (cH*GPbar^2*del[GP, Index[Lorentz, mu$1]]^2)/(2*vev^2) +
49    (cT*GPbar^2*del[GP, Index[Lorentz, mu$1]]^2)/(2*vev^2) -
50    I*ee*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$1]] +
51    ((2*I)*cT*ee*GP^2*GPbar*A[Index[Lorentz, mu$1]]*
52      del[GPbar, Index[Lorentz, mu$1]])/vev^2 -
53    (I*cA*ee^3*GP*vev^2*A[Index[Lorentz, mu$1]]*
54      del[GPbar, Index[Lorentz, mu$1]])/MW^2 +
55    (cH*G0*GP*del[G0, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$1]])/
56     vev^2 - (I*cT*GP*H*del[G0, Index[Lorentz, mu$1]]*
57      del[GPbar, Index[Lorentz, mu$1]])/vev^2 -
58    (I*cT*GP*del[G0, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$1]])/
59     vev + del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$1]] +
60    (cH*GP*GPbar*del[GP, Index[Lorentz, mu$1]]*
61      del[GPbar, Index[Lorentz, mu$1]])/vev^2 -
62    (cT*GP*GPbar*del[GP, Index[Lorentz, mu$1]]*
63      del[GPbar, Index[Lorentz, mu$1]])/vev^2 +
64    (cH*GP^2*del[GPbar, Index[Lorentz, mu$1]]^2)/(2*vev^2) +
65    (cT*GP^2*del[GPbar, Index[Lorentz, mu$1]]^2)/(2*vev^2) -
66    (2*cT*ee*G0*GP*GPbar*A[Index[Lorentz, mu$1]]*
67      del[H, Index[Lorentz, mu$1]])/vev^2 +
68    (cH*G0*H*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$1]])/
69     vev^2 + (cT*G0*H*del[G0, Index[Lorentz, mu$1]]*
70      del[H, Index[Lorentz, mu$1]])/vev^2 +
71    (cH*G0*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$1]])/vev +
72    (cT*G0*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$1]])/vev -
73    (I*cT*G0*GPbar*del[GP, Index[Lorentz, mu$1]]*
74      del[H, Index[Lorentz, mu$1]])/vev^2 +
75    (cH*GPbar*H*del[GP, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$1]])/
76     vev^2 + (cH*GPbar*del[GP, Index[Lorentz, mu$1]]*
77      del[H, Index[Lorentz, mu$1]])/vev +
78    (I*cT*G0*GP*del[GPbar, Index[Lorentz, mu$1]]*
79      del[H, Index[Lorentz, mu$1]])/vev^2 +
80    (cH*GP*H*del[GPbar, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$1]])/
81     vev^2 + (cH*GP*del[GPbar, Index[Lorentz, mu$1]]*
82      del[H, Index[Lorentz, mu$1]])/vev + del[H, Index[Lorentz, mu$1]]^2/2 -
83    (cT*G0^2*del[H, Index[Lorentz, mu$1]]^2)/(2*vev^2) +
84    (cH*H^2*del[H, Index[Lorentz, mu$1]]^2)/(2*vev^2) +
85    (cH*H*del[H, Index[Lorentz, mu$1]]^2)/vev -
86    (AH*H*(-del[A[mu], nu] + del[A[nu], mu])^2)/4 -
87    (I*cHB*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
88      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 -
89    (I*cHW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
90      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 -
91    ((I/2)*cHB*ee*del[G0, Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
92      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
93    ((I/2)*cHW*ee*del[G0, Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
94      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
95    (cHB*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
96      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
97    (cHW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
98      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
99    (cHB*ee^2*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
100      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
101    (cHW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
102      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
103    (I*cHB*ee*del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
104      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
105    (I*cHW*ee*del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
106      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 -
107    (cHB*ee*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
108      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
109    (cHW*ee*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
110      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 -
111    ((I/2)*cHB*ee*del[H, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
112      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
113    ((I/2)*cHW*ee*del[H, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
114      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 -
115    (cw^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/2 +
116    (cA*ee^2*G0^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/
117     MW^2 + (2*cA*ee^2*GP*GPbar*del[A[Index[Lorentz, mu$1]],
118        Index[Lorentz, mu$2]]^2)/MW^2 +
119    (cA*ee^2*H^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/MW^2 -
120    (sw^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/2 +
121    (2*cA*ee^2*H*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/
122     MW^2 + (cA*ee^2*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^
123       2)/MW^2 - (cA*cw^2*ee^2*vev^2*del[A[Index[Lorentz, mu$1]],
124        Index[Lorentz, mu$2]]^2)/MW^2 -
125    (cA*ee^2*sw^2*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/
126     MW^2 + (I*cHB*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*
127      A[Index[Lorentz, mu$2]]*del[A[Index[Lorentz, mu$2]],
128       Index[Lorentz, mu$1]])/MW^2 +
129    (I*cHW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
130      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 +
131    ((I/2)*cHB*ee*del[G0, Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
132      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
133    ((I/2)*cHW*ee*del[G0, Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
134      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
135    (cHB*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
136      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
137    (cHW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
138      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
139    (cHB*ee^2*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
140      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
141    (cHW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
142      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
143    (I*cHB*ee*del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
144      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
145    (I*cHW*ee*del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
146      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 +
147    (cHB*ee*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
148      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
149    (cHW*ee*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
150      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 +
151    ((I/2)*cHB*ee*del[H, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
152      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
153    ((I/2)*cHW*ee*del[H, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
154      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 +
155    (cw^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
156      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/2 -
157    (cA*ee^2*G0^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
158      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
159    (2*cA*ee^2*GP*GPbar*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
160      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
161    (cA*ee^2*H^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
162      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 +
163    (sw^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
164      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/2 -
165    (2*cA*ee^2*H*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
166      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
167    (cA*ee^2*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
168      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 +
169    (cA*cw^2*ee^2*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
170      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 +
171    (cA*ee^2*sw^2*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
172      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
173    (cB*ee^2*GP*GPbar*A[Index[Lorentz, mu$1]]*
174      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
175       Index[Lorentz, mu$2]])/MW^2 -
176    (cWW*ee^2*GP*GPbar*A[Index[Lorentz, mu$1]]*
177      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
178       Index[Lorentz, mu$2]])/MW^2 + (cB*ee*H*del[G0, Index[Lorentz, mu$1]]*
179      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
180       Index[Lorentz, mu$2]])/(2*MW^2) -
181    (cWW*ee*H*del[G0, Index[Lorentz, mu$1]]*
182      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
183       Index[Lorentz, mu$2]])/(2*MW^2) +
184    (cB*ee*vev*del[G0, Index[Lorentz, mu$1]]*
185      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
186       Index[Lorentz, mu$2]])/(2*MW^2) -
187    (cWW*ee*vev*del[G0, Index[Lorentz, mu$1]]*
188      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
189       Index[Lorentz, mu$2]])/(2*MW^2) -
190    ((I/2)*cB*ee*GPbar*del[GP, Index[Lorentz, mu$1]]*
191      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
192       Index[Lorentz, mu$2]])/MW^2 -
193    ((I/2)*cWW*ee*GPbar*del[GP, Index[Lorentz, mu$1]]*
194      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
195       Index[Lorentz, mu$2]])/MW^2 +
196    ((I/2)*cB*ee*GP*del[GPbar, Index[Lorentz, mu$1]]*
197      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
198       Index[Lorentz, mu$2]])/MW^2 +
199    ((I/2)*cWW*ee*GP*del[GPbar, Index[Lorentz, mu$1]]*
200      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
201       Index[Lorentz, mu$2]])/MW^2 - (cB*ee*G0*del[H, Index[Lorentz, mu$1]]*
202      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
203       Index[Lorentz, mu$2]])/(2*MW^2) +
204    (cWW*ee*G0*del[H, Index[Lorentz, mu$1]]*
205      del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
206       Index[Lorentz, mu$2]])/(2*MW^2) +
207    (c2B*cw^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
208       Index[Lorentz, mu$2]]*del[del[A[Index[Lorentz, mu$1]],
209        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
210    (c2W*sw^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
211       Index[Lorentz, mu$2]]*del[del[A[Index[Lorentz, mu$1]],
212        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
213    (cB*ee^2*GP*GPbar*A[Index[Lorentz, mu$1]]*
214      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
215       Index[Lorentz, mu$2]])/MW^2 +
216    (cWW*ee^2*GP*GPbar*A[Index[Lorentz, mu$1]]*
217      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
218       Index[Lorentz, mu$2]])/MW^2 - (cB*ee*H*del[G0, Index[Lorentz, mu$1]]*
219      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
220       Index[Lorentz, mu$2]])/(2*MW^2) +
221    (cWW*ee*H*del[G0, Index[Lorentz, mu$1]]*
222      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
223       Index[Lorentz, mu$2]])/(2*MW^2) -
224    (cB*ee*vev*del[G0, Index[Lorentz, mu$1]]*
225      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
226       Index[Lorentz, mu$2]])/(2*MW^2) +
227    (cWW*ee*vev*del[G0, Index[Lorentz, mu$1]]*
228      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
229       Index[Lorentz, mu$2]])/(2*MW^2) +
230    ((I/2)*cB*ee*GPbar*del[GP, Index[Lorentz, mu$1]]*
231      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
232       Index[Lorentz, mu$2]])/MW^2 +
233    ((I/2)*cWW*ee*GPbar*del[GP, Index[Lorentz, mu$1]]*
234      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
235       Index[Lorentz, mu$2]])/MW^2 -
236    ((I/2)*cB*ee*GP*del[GPbar, Index[Lorentz, mu$1]]*
237      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
238       Index[Lorentz, mu$2]])/MW^2 -
239    ((I/2)*cWW*ee*GP*del[GPbar, Index[Lorentz, mu$1]]*
240      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
241       Index[Lorentz, mu$2]])/MW^2 + (cB*ee*G0*del[H, Index[Lorentz, mu$1]]*
242      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
243       Index[Lorentz, mu$2]])/(2*MW^2) -
244    (cWW*ee*G0*del[H, Index[Lorentz, mu$1]]*
245      del[del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
246       Index[Lorentz, mu$2]])/(2*MW^2) -
247    (c2B*cw^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
248       Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$2]],
249        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
250    (c2W*sw^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
251       Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$2]],
252        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
253    (c2B*cw^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
254       Index[Lorentz, mu$2]]*del[del[A[Index[Lorentz, mu$3]],
255        Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 -
256    (c2W*sw^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
257       Index[Lorentz, mu$2]]*del[del[A[Index[Lorentz, mu$3]],
258        Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 +
259    (c2B*cw^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
260       Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$3]],
261        Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 +
262    (c2W*sw^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
263       Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$3]],
264        Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 +
265    (c2G*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
266        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
267      del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
268        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
269    (c2G*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
270        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
271      del[del[G[Index[Lorentz, mu$2], Index[Gluon, Gluon$1]],
272        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
273    (c2G*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
274        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
275      del[del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$1]],
276        Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 +
277    (c2G*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
278        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
279      del[del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$1]],
280        Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 +
281    (cWW*ee^2*G0*GPbar*A[Index[Lorentz, mu$1]]*
282      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
283       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
284    ((I/2)*cWW*ee^2*GPbar*H*A[Index[Lorentz, mu$1]]*
285      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
286       Index[Lorentz, mu$2]])/(MW^2*sw) -
287    ((I/2)*cWW*ee^2*GPbar*vev*A[Index[Lorentz, mu$1]]*
288      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
289       Index[Lorentz, mu$2]])/(MW^2*sw) +
290    ((I/2)*cWW*ee*GPbar*del[G0, Index[Lorentz, mu$1]]*
291      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
292       Index[Lorentz, mu$2]])/(MW^2*sw) -
293    ((I/2)*cWW*ee*G0*del[GPbar, Index[Lorentz, mu$1]]*
294      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
295       Index[Lorentz, mu$2]])/(MW^2*sw) -
296    (cWW*ee*H*del[GPbar, Index[Lorentz, mu$1]]*
297      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
298       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
299    (cWW*ee*vev*del[GPbar, Index[Lorentz, mu$1]]*
300      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
301       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
302    (cWW*ee*GPbar*del[H, Index[Lorentz, mu$1]]*
303      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
304       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
305    (cWW*ee^2*G0*GPbar*A[Index[Lorentz, mu$1]]*
306      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
307       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
308    ((I/2)*cWW*ee^2*GPbar*H*A[Index[Lorentz, mu$1]]*
309      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
310       Index[Lorentz, mu$2]])/(MW^2*sw) +
311    ((I/2)*cWW*ee^2*GPbar*vev*A[Index[Lorentz, mu$1]]*
312      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
313       Index[Lorentz, mu$2]])/(MW^2*sw) -
314    ((I/2)*cWW*ee*GPbar*del[G0, Index[Lorentz, mu$1]]*
315      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
316       Index[Lorentz, mu$2]])/(MW^2*sw) +
317    ((I/2)*cWW*ee*G0*del[GPbar, Index[Lorentz, mu$1]]*
318      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
319       Index[Lorentz, mu$2]])/(MW^2*sw) +
320    (cWW*ee*H*del[GPbar, Index[Lorentz, mu$1]]*
321      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
322       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
323    (cWW*ee*vev*del[GPbar, Index[Lorentz, mu$1]]*
324      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
325       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
326    (cWW*ee*GPbar*del[H, Index[Lorentz, mu$1]]*
327      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
328       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
329    (cWW*ee^2*G0*GP*A[Index[Lorentz, mu$1]]*
330      del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
331       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
332    ((I/2)*cWW*ee^2*GP*H*A[Index[Lorentz, mu$1]]*
333      del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
334       Index[Lorentz, mu$2]])/(MW^2*sw) +
335    ((I/2)*cWW*ee^2*GP*vev*A[Index[Lorentz, mu$1]]*
336      del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
337       Index[Lorentz, mu$2]])/(MW^2*sw) -
338    ((I/2)*cWW*ee*GP*del[G0, Index[Lorentz, mu$1]]*
339      del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
340       Index[Lorentz, mu$2]])/(MW^2*sw) +
341    ((I/2)*cWW*ee*G0*del[GP, Index[Lorentz, mu$1]]*
342      del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
343       Index[Lorentz, mu$2]])/(MW^2*sw) -
344    (cWW*ee*H*del[GP, Index[Lorentz, mu$1]]*
345      del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
346       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
347    (cWW*ee*vev*del[GP, Index[Lorentz, mu$1]]*
348      del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
349       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
350    (cWW*ee*GP*del[H, Index[Lorentz, mu$1]]*
351      del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
352       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
353    (2*c2W*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
354       Index[Lorentz, mu$2]]*del[del[Wbar[Index[Lorentz, mu$1]],
355        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
356    (cWW*ee^2*G0*GP*A[Index[Lorentz, mu$1]]*
357      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
358       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
359    ((I/2)*cWW*ee^2*GP*H*A[Index[Lorentz, mu$1]]*
360      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
361       Index[Lorentz, mu$2]])/(MW^2*sw) -
362    ((I/2)*cWW*ee^2*GP*vev*A[Index[Lorentz, mu$1]]*
363      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
364       Index[Lorentz, mu$2]])/(MW^2*sw) +
365    ((I/2)*cWW*ee*GP*del[G0, Index[Lorentz, mu$1]]*
366      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
367       Index[Lorentz, mu$2]])/(MW^2*sw) -
368    ((I/2)*cWW*ee*G0*del[GP, Index[Lorentz, mu$1]]*
369      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
370       Index[Lorentz, mu$2]])/(MW^2*sw) +
371    (cWW*ee*H*del[GP, Index[Lorentz, mu$1]]*
372      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
373       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
374    (cWW*ee*vev*del[GP, Index[Lorentz, mu$1]]*
375      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
376       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
377    (cWW*ee*GP*del[H, Index[Lorentz, mu$1]]*
378      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
379       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
380    (2*c2W*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
381       Index[Lorentz, mu$1]]*del[del[Wbar[Index[Lorentz, mu$2]],
382        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
383    (2*c2W*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
384       Index[Lorentz, mu$2]]*del[del[Wbar[Index[Lorentz, mu$3]],
385        Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 +
386    (2*c2W*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
387       Index[Lorentz, mu$1]]*del[del[Wbar[Index[Lorentz, mu$3]],
388        Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 -
389    (cw*cWW*ee^2*GP*GPbar*A[Index[Lorentz, mu$1]]*
390      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
391       Index[Lorentz, mu$2]])/(MW^2*sw) +
392    (cB*ee^2*GP*GPbar*sw*A[Index[Lorentz, mu$1]]*
393      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
394       Index[Lorentz, mu$2]])/(cw*MW^2) -
395    (cw*cWW*ee*H*del[G0, Index[Lorentz, mu$1]]*
396      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
397       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
398    (cB*ee*H*sw*del[G0, Index[Lorentz, mu$1]]*
399      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
400       Index[Lorentz, mu$2]])/(2*cw*MW^2) -
401    (cw*cWW*ee*vev*del[G0, Index[Lorentz, mu$1]]*
402      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
403       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
404    (cB*ee*sw*vev*del[G0, Index[Lorentz, mu$1]]*
405      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
406       Index[Lorentz, mu$2]])/(2*cw*MW^2) -
407    ((I/2)*cw*cWW*ee*GPbar*del[GP, Index[Lorentz, mu$1]]*
408      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
409       Index[Lorentz, mu$2]])/(MW^2*sw) +
410    ((I/2)*cB*ee*GPbar*sw*del[GP, Index[Lorentz, mu$1]]*
411      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
412       Index[Lorentz, mu$2]])/(cw*MW^2) +
413    ((I/2)*cw*cWW*ee*GP*del[GPbar, Index[Lorentz, mu$1]]*
414      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
415       Index[Lorentz, mu$2]])/(MW^2*sw) -
416    ((I/2)*cB*ee*GP*sw*del[GPbar, Index[Lorentz, mu$1]]*
417      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
418       Index[Lorentz, mu$2]])/(cw*MW^2) +
419    (cw*cWW*ee*G0*del[H, Index[Lorentz, mu$1]]*
420      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
421       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
422    (cB*ee*G0*sw*del[H, Index[Lorentz, mu$1]]*
423      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
424       Index[Lorentz, mu$2]])/(2*cw*MW^2) -
425    (2*c2B*cw*sw*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
426       Index[Lorentz, mu$2]]*del[del[Z[Index[Lorentz, mu$1]],
427        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
428    (2*c2W*cw*sw*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
429       Index[Lorentz, mu$2]]*del[del[Z[Index[Lorentz, mu$1]],
430        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
431    (c2W*cw^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
432       Index[Lorentz, mu$2]]*del[del[Z[Index[Lorentz, mu$1]],
433        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
434    (c2B*sw^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
435       Index[Lorentz, mu$2]]*del[del[Z[Index[Lorentz, mu$1]],
436        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
437    (cw*cWW*ee^2*GP*GPbar*A[Index[Lorentz, mu$1]]*
438      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
439       Index[Lorentz, mu$2]])/(MW^2*sw) -
440    (cB*ee^2*GP*GPbar*sw*A[Index[Lorentz, mu$1]]*
441      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
442       Index[Lorentz, mu$2]])/(cw*MW^2) +
443    (cw*cWW*ee*H*del[G0, Index[Lorentz, mu$1]]*
444      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
445       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
446    (cB*ee*H*sw*del[G0, Index[Lorentz, mu$1]]*
447      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
448       Index[Lorentz, mu$2]])/(2*cw*MW^2) +
449    (cw*cWW*ee*vev*del[G0, Index[Lorentz, mu$1]]*
450      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
451       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
452    (cB*ee*sw*vev*del[G0, Index[Lorentz, mu$1]]*
453      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
454       Index[Lorentz, mu$2]])/(2*cw*MW^2) +
455    ((I/2)*cw*cWW*ee*GPbar*del[GP, Index[Lorentz, mu$1]]*
456      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
457       Index[Lorentz, mu$2]])/(MW^2*sw) -
458    ((I/2)*cB*ee*GPbar*sw*del[GP, Index[Lorentz, mu$1]]*
459      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
460       Index[Lorentz, mu$2]])/(cw*MW^2) -
461    ((I/2)*cw*cWW*ee*GP*del[GPbar, Index[Lorentz, mu$1]]*
462      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
463       Index[Lorentz, mu$2]])/(MW^2*sw) +
464    ((I/2)*cB*ee*GP*sw*del[GPbar, Index[Lorentz, mu$1]]*
465      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
466       Index[Lorentz, mu$2]])/(cw*MW^2) -
467    (cw*cWW*ee*G0*del[H, Index[Lorentz, mu$1]]*
468      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
469       Index[Lorentz, mu$2]])/(2*MW^2*sw) -
470    (cB*ee*G0*sw*del[H, Index[Lorentz, mu$1]]*
471      del[del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]],
472       Index[Lorentz, mu$2]])/(2*cw*MW^2) +
473    (2*c2B*cw*sw*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
474       Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$2]],
475        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
476    (2*c2W*cw*sw*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
477       Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$2]],
478        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
479    (c2W*cw^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
480       Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$2]],
481        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
482    (c2B*sw^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
483       Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$2]],
484        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
485    (2*c2B*cw*sw*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
486       Index[Lorentz, mu$2]]*del[del[Z[Index[Lorentz, mu$3]],
487        Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 -
488    (2*c2W*cw*sw*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
489       Index[Lorentz, mu$2]]*del[del[Z[Index[Lorentz, mu$3]],
490        Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 -
491    (c2W*cw^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
492       Index[Lorentz, mu$2]]*del[del[Z[Index[Lorentz, mu$3]],
493        Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 -
494    (c2B*sw^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
495       Index[Lorentz, mu$2]]*del[del[Z[Index[Lorentz, mu$3]],
496        Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 -
497    (2*c2B*cw*sw*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
498       Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$3]],
499        Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 +
500    (2*c2W*cw*sw*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
501       Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$3]],
502        Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 +
503    (c2W*cw^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
504       Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$3]],
505        Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 +
506    (c2B*sw^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
507       Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$3]],
508        Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 -
509    del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]^
510      2/2 + (cG*dum^2*G0^2*gs^2*del[G[Index[Lorentz, mu$1],
511         Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]^2)/MW^2 +
512    (2*cG*dum^2*GP*GPbar*gs^2*del[G[Index[Lorentz, mu$1],
513         Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]^2)/MW^2 +
514    (cG*dum^2*gs^2*H^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
515        Index[Lorentz, mu$2]]^2)/MW^2 +
516    (2*cG*dum^2*gs^2*H*vev*del[G[Index[Lorentz, mu$1],
517         Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]^2)/MW^2 +
518    (del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
519       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
520        Index[Gluon, Gluon$1]], Index[Lorentz, mu$1]])/2 -
521    (cG*dum^2*G0^2*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
522       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
523        Index[Gluon, Gluon$1]], Index[Lorentz, mu$1]])/MW^2 -
524    (2*cG*dum^2*GP*GPbar*gs^2*del[G[Index[Lorentz, mu$1],
525        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
526      del[G[Index[Lorentz, mu$2], Index[Gluon, Gluon$1]],
527       Index[Lorentz, mu$1]])/MW^2 -
528    (cG*dum^2*gs^2*H^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
529       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
530        Index[Gluon, Gluon$1]], Index[Lorentz, mu$1]])/MW^2 -
531    (2*cG*dum^2*gs^2*H*vev*del[G[Index[Lorentz, mu$1],
532        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
533      del[G[Index[Lorentz, mu$2], Index[Gluon, Gluon$1]],
534       Index[Lorentz, mu$1]])/MW^2 -
535    (I*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
536      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
537    (cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
538      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
539    (cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
540      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
541    (cHW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
542      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
543    (cWW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
544      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(2*MW^2*sw) +
545    (cWW*ee^2*G0*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
546      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(2*MW^2*sw) -
547    ((I/2)*cWW*ee^2*H*A[Index[Lorentz, mu$1]]*
548      del[GPbar, Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$1]],
549       Index[Lorentz, mu$2]])/(MW^2*sw) -
550    ((I/2)*cWW*ee^2*vev*A[Index[Lorentz, mu$1]]*
551      del[GPbar, Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$1]],
552       Index[Lorentz, mu$2]])/(MW^2*sw) -
553    (I*cHW*ee*del[G0, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
554      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) +
555    (I*cHW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
556      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) +
557    ((I/2)*cWW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*
558      del[H, Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$1]],
559       Index[Lorentz, mu$2]])/(MW^2*sw) +
560    (cHW*ee*del[GPbar, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
561      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) +
562    ((2*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[Wbar[Index[Lorentz, mu$2]],
563        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
564      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 -
565    ((2*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[Wbar[Index[Lorentz, mu$2]],
566        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
567      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 +
568    ((I/2)*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
569      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
570    (cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
571      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(2*MW^2*sw) +
572    (cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
573      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(2*MW^2*sw) +
574    (cHW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
575      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
576    (cWW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
577      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
578    (cWW*ee^2*G0*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
579      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
580    (I*cWW*ee^2*H*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
581      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
582    (I*cWW*ee^2*vev*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
583      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
584    (I*cHW*ee*del[G0, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
585      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
586    (I*cHW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
587      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
588    (I*cWW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
589      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
590    (cHW*ee*del[GPbar, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
591      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
592    ((4*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[Wbar[Index[Lorentz, mu$2]],
593        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
594      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 +
595    ((I/2)*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]^2*
596      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(MW^2*sw) +
597    (cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]^2*del[W[Index[Lorentz, mu$2]],
598       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
599    (cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]^2*
600      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(2*MW^2*sw) -
601    (cWW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$1]]*
602      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(2*MW^2*sw) +
603    (cWW*ee^2*G0*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$1]]*
604      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(2*MW^2*sw) -
605    ((I/2)*cWW*ee^2*H*A[Index[Lorentz, mu$1]]*
606      del[GPbar, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
607       Index[Lorentz, mu$2]])/(MW^2*sw) -
608    ((I/2)*cWW*ee^2*vev*A[Index[Lorentz, mu$1]]*
609      del[GPbar, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
610       Index[Lorentz, mu$2]])/(MW^2*sw) +
611    ((I/2)*cWW*ee^2*GPbar*A[Index[Lorentz, mu$1]]*
612      del[H, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
613       Index[Lorentz, mu$2]])/(MW^2*sw) +
614    ((4*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[Wbar[Index[Lorentz, mu$2]],
615        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
616      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]])/MW^2 +
617    ((2*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[Wbar[Index[Lorentz, mu$1]],
618        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
619      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
620    ((2*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[Wbar[Index[Lorentz, mu$2]],
621        Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
622      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
623    (I*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
624      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
625    (cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
626      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
627    (cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
628      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
629    (cHW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
630      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
631    (cWW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
632      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(2*MW^2*sw) +
633    (cWW*ee^2*G0*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
634      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(2*MW^2*sw) +
635    ((I/2)*cWW*ee^2*H*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
636      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) +
637    ((I/2)*cWW*ee^2*vev*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
638      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) +
639    (I*cHW*ee*del[G0, Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
640      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
641    (I*cHW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
642      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
643    ((I/2)*cWW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
644      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) +
645    (cHW*ee*del[GP, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
646      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
647    ((2*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[W[Index[Lorentz, mu$2]],
648        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
649      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 -
650    del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
651     del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]] -
652    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
653      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
654      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
655    ((2*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[W[Index[Lorentz, mu$2]],
656        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
657      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 +
658    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
659      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
660      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 +
661    ((6*I)*c3W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
662      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
663      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/(MW^2*sw^2) -
664    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
665      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
666      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/MW^2 -
667    ((6*I)*c3W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
668      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
669      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/(MW^2*sw^2) -
670    ((I/2)*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
671      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
672    (cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
673      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(2*MW^2*sw) +
674    (cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
675      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(2*MW^2*sw) +
676    (cHW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
677      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
678    (cWW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
679      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
680    (cWW*ee^2*G0*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
681      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
682    (I*cWW*ee^2*H*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
683      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
684    (I*cWW*ee^2*vev*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
685      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
686    (I*cHW*ee*del[G0, Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
687      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
688    (I*cHW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
689      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
690    (I*cWW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
691      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
692    (cHW*ee*del[GP, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
693      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
694    ((4*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[W[Index[Lorentz, mu$2]],
695        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
696      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 +
697    del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
698     del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]] -
699    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
700      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
701      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
702    ((I/2)*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]^2*
703      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(MW^2*sw) +
704    (cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]^2*del[Wbar[Index[Lorentz, mu$2]],
705       Index[Lorentz, mu$2]])/(2*MW^2*sw) +
706    (cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]^2*
707      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(2*MW^2*sw) -
708    (cWW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$1]]*
709      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(2*MW^2*sw) +
710    (cWW*ee^2*G0*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$1]]*
711      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(2*MW^2*sw) +
712    ((I/2)*cWW*ee^2*H*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$1]]*
713      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(MW^2*sw) +
714    ((I/2)*cWW*ee^2*vev*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$1]]*
715      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(MW^2*sw) -
716    ((I/2)*cWW*ee^2*GP*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$1]]*
717      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]])/(MW^2*sw) +
718    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
719      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
720      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 -
721    ((6*I)*c3W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
722      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
723      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/(MW^2*sw^2) -
724    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
725      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
726      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/MW^2 +
727    ((6*I)*c3W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
728      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
729      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/(MW^2*sw^2) -
730    ((4*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[W[Index[Lorentz, mu$2]],
731        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
732      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]])/MW^2 -
733    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
734      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
735      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]])/MW^2 -
736    ((6*I)*c3W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
737      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
738      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]])/(MW^2*sw^2) +
739    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
740      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
741      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]])/MW^2 +
742    ((6*I)*c3W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
743      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
744      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]])/(MW^2*sw^2) -
745    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
746      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
747      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]])/MW^2 +
748    ((6*I)*c3W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
749      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
750      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]])/(MW^2*sw^2) +
751    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
752      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
753      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]])/MW^2 -
754    ((6*I)*c3W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
755      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
756      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]])/(MW^2*sw^2) -
757    ((2*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[W[Index[Lorentz, mu$1]],
758        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
759      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
760    ((2*I)*c2W*ee*A[Index[Lorentz, mu$1]]*del[del[W[Index[Lorentz, mu$2]],
761        Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
762      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
763    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
764      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
765      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 -
766    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
767      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
768      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]])/MW^2 +
769    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]^2*del[W[Index[Lorentz, mu$2]],
770       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
771       Index[Lorentz, mu$3]])/MW^2 -
772    (I*cHW*cw*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
773      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) +
774    (I*cHB*ee^3*GP*GPbar*sw*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
775      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) +
776    ((I/2)*cHW*cw*ee*del[G0, Index[Lorentz, mu$1]]*
777      del[G0, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$1]],
778       Index[Lorentz, mu$2]])/(MW^2*sw) +
779    ((I/2)*cHB*ee*sw*del[G0, Index[Lorentz, mu$1]]*
780      del[G0, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$1]],
781       Index[Lorentz, mu$2]])/(cw*MW^2) +
782    (cHW*cw*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
783      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
784    (cHB*ee^2*GPbar*sw*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
785      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) +
786    (cHW*cw*ee^2*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
787      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) -
788    (cHB*ee^2*GP*sw*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
789      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) +
790    (I*cHW*cw*ee*del[GP, Index[Lorentz, mu$1]]*
791      del[GPbar, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$1]],
792       Index[Lorentz, mu$2]])/(MW^2*sw) -
793    (I*cHB*ee*sw*del[GP, Index[Lorentz, mu$1]]*
794      del[GPbar, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$1]],
795       Index[Lorentz, mu$2]])/(cw*MW^2) +
796    (cHW*cw*ee*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
797      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(MW^2*sw) +
798    (cHB*ee*sw*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
799      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) +
800    ((I/2)*cHW*cw*ee*del[H, Index[Lorentz, mu$1]]*
801      del[H, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$1]],
802       Index[Lorentz, mu$2]])/(MW^2*sw) +
803    ((I/2)*cHB*ee*sw*del[H, Index[Lorentz, mu$1]]*
804      del[H, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$1]],
805       Index[Lorentz, mu$2]])/(cw*MW^2) -
806    (2*cA*ee^2*G0^2*sw*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
807      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) -
808    (4*cA*ee^2*GP*GPbar*sw*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
809      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) -
810    (2*cA*ee^2*H^2*sw*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
811      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) -
812    (4*cA*ee^2*H*sw*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
813      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) -
814    (2*cA*ee^2*sw*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
815      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) +
816    (2*cA*cw*ee^2*sw*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
817      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/MW^2 +
818    (2*cA*ee^2*sw^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
819      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]])/(cw*MW^2) -
820    (cw^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/2 -
821    (sw^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/2 +
822    (cA*ee^2*G0^2*sw^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/
823     (cw^2*MW^2) + (2*cA*ee^2*GP*GPbar*sw^2*
824      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/(cw^2*MW^2) +
825    (cA*ee^2*H^2*sw^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/
826     (cw^2*MW^2) + (2*cA*ee^2*H*sw^2*vev*del[Z[Index[Lorentz, mu$1]],
827        Index[Lorentz, mu$2]]^2)/(cw^2*MW^2) -
828    (cA*ee^2*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/
829     MW^2 + (cA*cw^2*ee^2*vev^2*del[Z[Index[Lorentz, mu$1]],
830        Index[Lorentz, mu$2]]^2)/MW^2 +
831    (cA*ee^2*sw^2*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]^2)/
832     MW^2 + ((6*I)*c3W*cw*ee^3*del[W[Index[Lorentz, mu$1]],
833       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$2]],
834       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$1]],
835       Index[Lorentz, mu$3]])/(MW^2*sw^3) -
836    ((6*I)*c3W*cw*ee^3*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
837      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
838      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]])/(MW^2*sw^3) +
839    (I*cHW*cw*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
840      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
841    (I*cHB*ee^3*GP*GPbar*sw*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
842      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) -
843    ((I/2)*cHW*cw*ee*del[G0, Index[Lorentz, mu$1]]*
844      del[G0, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
845       Index[Lorentz, mu$1]])/(MW^2*sw) -
846    ((I/2)*cHB*ee*sw*del[G0, Index[Lorentz, mu$1]]*
847      del[G0, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
848       Index[Lorentz, mu$1]])/(cw*MW^2) -
849    (cHW*cw*ee^2*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
850      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
851    (cHB*ee^2*GPbar*sw*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
852      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) -
853    (cHW*cw*ee^2*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
854      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) +
855    (cHB*ee^2*GP*sw*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
856      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) -
857    (I*cHW*cw*ee*del[GP, Index[Lorentz, mu$1]]*
858      del[GPbar, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
859       Index[Lorentz, mu$1]])/(MW^2*sw) +
860    (I*cHB*ee*sw*del[GP, Index[Lorentz, mu$1]]*
861      del[GPbar, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
862       Index[Lorentz, mu$1]])/(cw*MW^2) -
863    (cHW*cw*ee*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
864      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(MW^2*sw) -
865    (cHB*ee*sw*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
866      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) -
867    ((I/2)*cHW*cw*ee*del[H, Index[Lorentz, mu$1]]*
868      del[H, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
869       Index[Lorentz, mu$1]])/(MW^2*sw) -
870    ((I/2)*cHB*ee*sw*del[H, Index[Lorentz, mu$1]]*
871      del[H, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
872       Index[Lorentz, mu$1]])/(cw*MW^2) +
873    (2*cA*ee^2*G0^2*sw*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
874      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) +
875    (4*cA*ee^2*GP*GPbar*sw*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
876      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) +
877    (2*cA*ee^2*H^2*sw*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
878      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) +
879    (4*cA*ee^2*H*sw*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
880      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) +
881    (2*cA*ee^2*sw*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
882      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) -
883    (2*cA*cw*ee^2*sw*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
884      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
885    (2*cA*ee^2*sw^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
886      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw*MW^2) +
887    (cw^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
888      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/2 +
889    (sw^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
890      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/2 -
891    (cA*ee^2*G0^2*sw^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
892      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw^2*MW^2) -
893    (2*cA*ee^2*GP*GPbar*sw^2*del[Z[Index[Lorentz, mu$1]],
894       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
895       Index[Lorentz, mu$1]])/(cw^2*MW^2) -
896    (cA*ee^2*H^2*sw^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
897      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw^2*MW^2) -
898    (2*cA*ee^2*H*sw^2*vev*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
899      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/(cw^2*MW^2) +
900    (cA*ee^2*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
901      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
902    (cA*cw^2*ee^2*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
903      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
904    (cA*ee^2*sw^2*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
905      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]])/MW^2 -
906    ((6*I)*c3W*cw*ee^3*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
907      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
908      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/(MW^2*sw^3) +
909    ((6*I)*c3W*cw*ee^3*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
910      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
911      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]])/(MW^2*sw^3) -
912    ((6*I)*c3W*cw*ee^3*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
913      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
914      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]])/(MW^2*sw^3) +
915    ((6*I)*c3W*cw*ee^3*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
916      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
917      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]])/(MW^2*sw^3) +
918    ((6*I)*c3W*cw*ee^3*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
919      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
920      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]])/(MW^2*sw^3) -
921    ((6*I)*c3W*cw*ee^3*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
922      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
923      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]])/(MW^2*sw^3) +
924    I*ee*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*ghAbar . ghWm -
925    I*ee*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
926     ghAbar . ghWp - cw^2*ghAbar . del[del[ghA, Index[Lorentz, mu$1]],
927       Index[Lorentz, mu$1]] +
928    cw*sw*ghAbar . del[del[ghZ, Index[Lorentz, mu$1]],
929       Index[Lorentz, mu$1]] - ghGbar . del[del[ghG, Index[Lorentz, mu$1]],
930      Index[Lorentz, mu$1]] - ghWibar . del[del[ghWi, Index[Lorentz, mu$1]],
931      Index[Lorentz, mu$1]] - ((I/2)*ee^2*GPbar*vev*ghWmbar . ghA)/sw +
932    I*ee*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
933     ghWmbar . ghA + ((I/4)*ee^2*G0*vev*ghWmbar . ghWm)/sw^2 -
934    (ee^2*H*vev*ghWmbar . ghWm)/(4*sw^2) + (cH*ee^2*H*vev*ghWmbar . ghWm)/
935     (8*sw^2) - (ee^2*vev^2*ghWmbar . ghWm)/(4*sw^2) -
936    I*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*ghWmbar . ghWm -
937    (I*cA*ee^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
938      ghWmbar . ghWm)/MW^2 - (I*cw*ee*del[Z[Index[Lorentz, mu$1]],
939       Index[Lorentz, mu$1]]*ghWmbar . ghWm)/sw -
940    (I*cA*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
941      ghWmbar . ghWm)/(cw*MW^2*sw) +
942    (I*cA*cw*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
943      ghWmbar . ghWm)/(MW^2*sw) + ((2*I)*cA*ee^3*sw*vev^2*
944      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*ghWmbar . ghWm)/
945     (cw*MW^2) + ((I/4)*ee^2*GPbar*vev*ghWmbar . ghZ)/cw -
946    ((I/4)*cw*ee^2*GPbar*vev*ghWmbar . ghZ)/sw^2 +
947    (I*cw*ee*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
948      ghWmbar . ghZ)/sw - I*ee*A[Index[Lorentz, mu$1]]*
949     ghWmbar . del[ghWm, Index[Lorentz, mu$1]] -
950    (I*cA*ee^3*vev^2*A[Index[Lorentz, mu$1]]*
951      ghWmbar . del[ghWm, Index[Lorentz, mu$1]])/MW^2 +
952    ((I/2)*ee^2*GP*vev*ghWpbar . ghA)/sw -
953    I*ee*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*ghWpbar . ghA -
954    ((I/4)*ee^2*G0*vev*ghWpbar . ghWp)/sw^2 - (ee^2*H*vev*ghWpbar . ghWp)/
955     (4*sw^2) + (cH*ee^2*H*vev*ghWpbar . ghWp)/(8*sw^2) -
956    (ee^2*vev^2*ghWpbar . ghWp)/(4*sw^2) +
957    I*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*ghWpbar . ghWp +
958    (I*cA*ee^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
959      ghWpbar . ghWp)/MW^2 + (I*cw*ee*del[Z[Index[Lorentz, mu$1]],
960       Index[Lorentz, mu$1]]*ghWpbar . ghWp)/sw +
961    (I*cA*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
962      ghWpbar . ghWp)/(cw*MW^2*sw) -
963    (I*cA*cw*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
964      ghWpbar . ghWp)/(MW^2*sw) - ((2*I)*cA*ee^3*sw*vev^2*
965      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*ghWpbar . ghWp)/
966     (cw*MW^2) - ((I/4)*ee^2*GP*vev*ghWpbar . ghZ)/cw +
967    ((I/4)*cw*ee^2*GP*vev*ghWpbar . ghZ)/sw^2 -
968    (I*cw*ee*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
969      ghWpbar . ghZ)/sw + I*ee*A[Index[Lorentz, mu$1]]*
970     ghWpbar . del[ghWp, Index[Lorentz, mu$1]] +
971    (I*cA*ee^3*vev^2*A[Index[Lorentz, mu$1]]*
972      ghWpbar . del[ghWp, Index[Lorentz, mu$1]])/MW^2 -
973    ((I/4)*ee^2*GP*vev*ghZbar . ghWm)/cw -
974    ((I/4)*cw*ee^2*GP*vev*ghZbar . ghWm)/sw^2 +
975    (I*cw*ee*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
976      ghZbar . ghWm)/sw + ((I/4)*ee^2*GPbar*vev*ghZbar . ghWp)/cw +
977    ((I/4)*cw*ee^2*GPbar*vev*ghZbar . ghWp)/sw^2 -
978    (I*cw*ee*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
979      ghZbar . ghWp)/sw - (ee^2*H*vev*ghZbar . ghZ)/2 +
980    (cH*ee^2*H*vev*ghZbar . ghZ)/4 - (cw^2*ee^2*H*vev*ghZbar . ghZ)/
981     (4*sw^2) + (cH*cw^2*ee^2*H*vev*ghZbar . ghZ)/(8*sw^2) -
982    (ee^2*H*sw^2*vev*ghZbar . ghZ)/(4*cw^2) +
983    (cH*ee^2*H*sw^2*vev*ghZbar . ghZ)/(8*cw^2) - (ee^2*vev^2*ghZbar . ghZ)/
984     2 - (cw^2*ee^2*vev^2*ghZbar . ghZ)/(4*sw^2) -
985    (ee^2*sw^2*vev^2*ghZbar . ghZ)/(4*cw^2) +
986    cw*sw*ghZbar . del[del[ghA, Index[Lorentz, mu$1]],
987       Index[Lorentz, mu$1]] -
988    sw^2*ghZbar . del[del[ghZ, Index[Lorentz, mu$1]], Index[Lorentz, mu$1]] -
989    (I*ee^3*GP*GPbar*tcHB*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
990      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
991      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
992       Index[Lorentz, mu$4]])/MW^2 -
993    (I*ee^3*GP*GPbar*tcHW*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
994      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
995      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
996       Index[Lorentz, mu$4]])/MW^2 + (ee^2*GPbar*tcHB*A[Index[Lorentz, mu$1]]*
997      del[GP, Index[Lorentz, mu$2]]*del[A[Index[Lorentz, mu$3]],
998       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
999       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/MW^2 +
1000    (ee^2*GPbar*tcHW*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
1001      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1002      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1003       Index[Lorentz, mu$4]])/MW^2 + (ee^2*GP*tcHB*A[Index[Lorentz, mu$1]]*
1004      del[GPbar, Index[Lorentz, mu$2]]*del[A[Index[Lorentz, mu$3]],
1005       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1006       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/MW^2 +
1007    (ee^2*GP*tcHW*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
1008      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1009      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1010       Index[Lorentz, mu$4]])/MW^2 + (I*ee*tcHB*del[GP, Index[Lorentz, mu$1]]*
1011      del[GPbar, Index[Lorentz, mu$2]]*del[A[Index[Lorentz, mu$3]],
1012       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1013       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/MW^2 +
1014    (I*ee*tcHW*del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
1015      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1016      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1017       Index[Lorentz, mu$4]])/MW^2 - (ee*tcHB*del[G0, Index[Lorentz, mu$1]]*
1018      del[H, Index[Lorentz, mu$2]]*del[A[Index[Lorentz, mu$3]],
1019       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1020       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/MW^2 +
1021    (ee*tcHW*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
1022      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1023      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1024       Index[Lorentz, mu$4]])/MW^2 +
1025    (ee^2*G0^2*tcA*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1026      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1027      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1028       Index[Lorentz, mu$4]])/MW^2 +
1029    (2*ee^2*GP*GPbar*tcA*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1030      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1031      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1032       Index[Lorentz, mu$4]])/MW^2 +
1033    (ee^2*H^2*tcA*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1034      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1035      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1036       Index[Lorentz, mu$4]])/MW^2 +
1037    (2*ee^2*H*tcA*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1038      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1039      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1040       Index[Lorentz, mu$4]])/MW^2 +
1041    (ee^2*tcA*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1042      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1043      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1044       Index[Lorentz, mu$4]])/MW^2 +
1045    (dum^2*G0^2*gs^2*tcG*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1046       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1047        Index[Gluon, Gluon$1]], Index[Lorentz, mu$4]]*
1048      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1049       Index[Lorentz, mu$4]])/MW^2 + (2*dum^2*GP*GPbar*gs^2*tcG*
1050      del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1051       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1052        Index[Gluon, Gluon$1]], Index[Lorentz, mu$4]]*
1053      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1054       Index[Lorentz, mu$4]])/MW^2 +
1055    (dum^2*gs^2*H^2*tcG*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1056       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1057        Index[Gluon, Gluon$1]], Index[Lorentz, mu$4]]*
1058      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1059       Index[Lorentz, mu$4]])/MW^2 +
1060    (2*dum^2*gs^2*H*tcG*vev*del[G[Index[Lorentz, mu$1],
1061        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
1062      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$1]],
1063       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1064       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/MW^2 +
1065    (dum^2*gs^2*tcG*vev^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1066       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1067        Index[Gluon, Gluon$1]], Index[Lorentz, mu$4]]*
1068      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1069       Index[Lorentz, mu$4]])/MW^2 - (ee^2*GPbar*tcHW*A[Index[Lorentz, mu$1]]*
1070      del[G0, Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
1071       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1072       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/(MW^2*sw) -
1073    (I*ee*tcHW*del[G0, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
1074      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1075      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1076       Index[Lorentz, mu$4]])/(MW^2*sw) +
1077    (I*ee^2*GPbar*tcHW*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
1078      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1079      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1080       Index[Lorentz, mu$4]])/(MW^2*sw) +
1081    (ee*tcHW*del[GPbar, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
1082      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1083      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1084       Index[Lorentz, mu$4]])/(MW^2*sw) -
1085    (ee^2*GP*tcHW*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
1086      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1087      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1088       Index[Lorentz, mu$4]])/(MW^2*sw) +
1089    (I*ee*tcHW*del[G0, Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
1090      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1091      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1092       Index[Lorentz, mu$4]])/(MW^2*sw) -
1093    (I*ee^2*GP*tcHW*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
1094      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1095      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1096       Index[Lorentz, mu$4]])/(MW^2*sw) +
1097    (ee*tcHW*del[GP, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
1098      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1099      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1100       Index[Lorentz, mu$4]])/(MW^2*sw) +
1101    (I*ee^3*GP*GPbar*sw*tcHB*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
1102      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1103      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1104       Index[Lorentz, mu$4]])/(cw*MW^2) -
1105    (I*cw*ee^3*GP*GPbar*tcHW*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
1106      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1107      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1108       Index[Lorentz, mu$4]])/(MW^2*sw) -
1109    (ee^2*GPbar*sw*tcHB*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
1110      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1111      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1112       Index[Lorentz, mu$4]])/(cw*MW^2) +
1113    (cw*ee^2*GPbar*tcHW*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
1114      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1115      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1116       Index[Lorentz, mu$4]])/(MW^2*sw) -
1117    (ee^2*GP*sw*tcHB*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
1118      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1119      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1120       Index[Lorentz, mu$4]])/(cw*MW^2) +
1121    (cw*ee^2*GP*tcHW*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
1122      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1123      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1124       Index[Lorentz, mu$4]])/(MW^2*sw) -
1125    (I*ee*sw*tcHB*del[GP, Index[Lorentz, mu$1]]*
1126      del[GPbar, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
1127       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1128       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/(cw*MW^2) +
1129    (I*cw*ee*tcHW*del[GP, Index[Lorentz, mu$1]]*
1130      del[GPbar, Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
1131       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1132       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/(MW^2*sw) +
1133    (ee*sw*tcHB*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
1134      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1135      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1136       Index[Lorentz, mu$4]])/(cw*MW^2) +
1137    (cw*ee*tcHW*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
1138      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1139      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1140       Index[Lorentz, mu$4]])/(MW^2*sw) -
1141    (2*ee^2*G0^2*sw*tcA*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1142      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1143      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1144       Index[Lorentz, mu$4]])/(cw*MW^2) -
1145    (4*ee^2*GP*GPbar*sw*tcA*del[A[Index[Lorentz, mu$1]],
1146       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
1147       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1148       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/(cw*MW^2) -
1149    (2*ee^2*H^2*sw*tcA*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1150      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1151      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1152       Index[Lorentz, mu$4]])/(cw*MW^2) -
1153    (4*ee^2*H*sw*tcA*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1154      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1155      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1156       Index[Lorentz, mu$4]])/(cw*MW^2) -
1157    (2*ee^2*sw*tcA*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1158      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1159      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1160       Index[Lorentz, mu$4]])/(cw*MW^2) +
1161    (ee^2*G0^2*sw^2*tcA*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1162      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1163      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1164       Index[Lorentz, mu$4]])/(cw^2*MW^2) +
1165    (2*ee^2*GP*GPbar*sw^2*tcA*del[Z[Index[Lorentz, mu$1]],
1166       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
1167       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1168       Index[Lorentz, mu$3], Index[Lorentz, mu$4]])/(cw^2*MW^2) +
1169    (ee^2*H^2*sw^2*tcA*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1170      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1171      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1172       Index[Lorentz, mu$4]])/(cw^2*MW^2) +
1173    (2*ee^2*H*sw^2*tcA*vev*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1174      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1175      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1176       Index[Lorentz, mu$4]])/(cw^2*MW^2) +
1177    (ee^2*sw^2*tcA*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1178      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1179      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1180       Index[Lorentz, mu$4]])/(cw^2*MW^2) +
1181    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1182      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1183      del[Wbar[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1184      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1185       Index[Lorentz, mu$5]])/(MW^2*sw^2) -
1186    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1187      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1188      del[Wbar[Index[Lorentz, mu$5]], Index[Lorentz, mu$4]]*
1189      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1190       Index[Lorentz, mu$5]])/(MW^2*sw^2) +
1191    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1192      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1193      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1194      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1195       Index[Lorentz, mu$5]])/(MW^2*sw^3) -
1196    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1197      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1198      del[Z[Index[Lorentz, mu$5]], Index[Lorentz, mu$4]]*
1199      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1200       Index[Lorentz, mu$5]])/(MW^2*sw^3) -
1201    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1202      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1203      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$5]]*
1204      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
1205       Index[Lorentz, mu$5]])/(MW^2*sw^2) +
1206    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1207      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1208      del[Wbar[Index[Lorentz, mu$5]], Index[Lorentz, mu$3]]*
1209      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
1210       Index[Lorentz, mu$5]])/(MW^2*sw^2) -
1211    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1212      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1213      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$5]]*
1214      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
1215       Index[Lorentz, mu$5]])/(MW^2*sw^3) +
1216    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1217      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1218      del[Z[Index[Lorentz, mu$5]], Index[Lorentz, mu$3]]*
1219      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
1220       Index[Lorentz, mu$5]])/(MW^2*sw^3) -
1221    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1222      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1223      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$5]]*
1224      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1225       Index[Lorentz, mu$5]])/(MW^2*sw^2) +
1226    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1227      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
1228      del[Wbar[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1229      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1230       Index[Lorentz, mu$5]])/(MW^2*sw^2) -
1231    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1232      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
1233      del[Wbar[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1234      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1235       Index[Lorentz, mu$5]])/(MW^2*sw^2) +
1236    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1237      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1238      del[Wbar[Index[Lorentz, mu$5]], Index[Lorentz, mu$2]]*
1239      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1240       Index[Lorentz, mu$5]])/(MW^2*sw^2) -
1241    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1242      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1243      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$5]]*
1244      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1245       Index[Lorentz, mu$5]])/(MW^2*sw^3) +
1246    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1247      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
1248      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1249      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1250       Index[Lorentz, mu$5]])/(MW^2*sw^3) -
1251    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1252      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
1253      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1254      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1255       Index[Lorentz, mu$5]])/(MW^2*sw^3) +
1256    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1257      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1258      del[Z[Index[Lorentz, mu$5]], Index[Lorentz, mu$2]]*
1259      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1260       Index[Lorentz, mu$5]])/(MW^2*sw^3) +
1261    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1262      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1263      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$5]]*
1264      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1265       Index[Lorentz, mu$5]])/(MW^2*sw^2) -
1266    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1267      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
1268      del[Wbar[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1269      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1270       Index[Lorentz, mu$5]])/(MW^2*sw^2) +
1271    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1272      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
1273      del[Wbar[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1274      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1275       Index[Lorentz, mu$5]])/(MW^2*sw^2) -
1276    ((2*I)*ee^3*tc3W*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1277      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1278      del[Wbar[Index[Lorentz, mu$5]], Index[Lorentz, mu$1]]*
1279      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1280       Index[Lorentz, mu$5]])/(MW^2*sw^2) +
1281    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1282      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1283      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$5]]*
1284      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1285       Index[Lorentz, mu$5]])/(MW^2*sw^3) -
1286    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1287      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
1288      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1289      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1290       Index[Lorentz, mu$5]])/(MW^2*sw^3) +
1291    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1292      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
1293      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
1294      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1295       Index[Lorentz, mu$5]])/(MW^2*sw^3) -
1296    ((2*I)*cw*ee^3*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
1297      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
1298      del[Z[Index[Lorentz, mu$5]], Index[Lorentz, mu$1]]*
1299      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
1300       Index[Lorentz, mu$5]])/(MW^2*sw^3) +
1301    gs*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1302      Index[Lorentz, mu$1]]*ghGbar[Index[Gluon, Gluon$2]] .
1303      ghG[Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
1304      Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]] +
1305    (cG*dum^2*gs^3*vev^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1306       Index[Lorentz, mu$1]]*ghGbar[Index[Gluon, Gluon$2]] .
1307       ghG[Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
1308       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/MW^2 -
1309    (gs^3*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1310       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
1311        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1312      del[G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]],
1313       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
1314       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1],
1315       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/(2*MW^2) +
1316    (gs^3*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1317       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1318        Index[Gluon, Gluon$2]], Index[Lorentz, mu$2]]*
1319      del[G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]],
1320       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
1321       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1],
1322       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/(2*MW^2) -
1323    (gs^3*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1324       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
1325        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1326      del[G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]],
1327       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$4],
1328       Index[Lorentz, mu$5], Index[Lorentz, mu$3]]*f[Index[Gluon, Gluon$1],
1329       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/(2*MW^2) +
1330    (gs^3*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1331       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1332        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1333      del[G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]],
1334       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1335       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1],
1336       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/(2*MW^2) -
1337    (gs^3*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1338       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1339        Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1340      del[G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]],
1341       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
1342       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1],
1343       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/(2*MW^2) +
1344    (gs^3*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1345       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1346        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
1347      del[G[Index[Lorentz, mu$5], Index[Gluon, Gluon$3]],
1348       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
1349       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1],
1350       Index[Gluon, Gluon$3], Index[Gluon, Gluon$2]])/(2*MW^2) +
1351    (gs^3*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1352       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1353        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
1354      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]],
1355       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1356       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$2],
1357       Index[Gluon, Gluon$3], Index[Gluon, Gluon$1]])/(2*MW^2) -
1358    (gs^3*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1359       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1360        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
1361      del[G[Index[Lorentz, mu$5], Index[Gluon, Gluon$3]],
1362       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
1363       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$2],
1364       Index[Gluon, Gluon$3], Index[Gluon, Gluon$1]])/(2*MW^2) +
1365    (I*c3G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1366       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
1367        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1368      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]],
1369       Index[Lorentz, mu$1]]*FSU3C[Index[Gluon, Gluon$1],
1370       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/MW^2 -
1371    (I*c3G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1372       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1373        Index[Gluon, Gluon$2]], Index[Lorentz, mu$2]]*
1374      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]],
1375       Index[Lorentz, mu$1]]*FSU3C[Index[Gluon, Gluon$1],
1376       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/MW^2 -
1377    (I*c3G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1378       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1379        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1380      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]],
1381       Index[Lorentz, mu$2]]*FSU3C[Index[Gluon, Gluon$1],
1382       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/MW^2 +
1383    (I*c3G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1384       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1385        Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1386      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]],
1387       Index[Lorentz, mu$2]]*FSU3C[Index[Gluon, Gluon$1],
1388       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]])/MW^2 -
1389    (I*c3G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1390       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1391        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1392      del[G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]],
1393       Index[Lorentz, mu$3]]*FSU3C[Index[Gluon, Gluon$1],
1394       Index[Gluon, Gluon$3], Index[Gluon, Gluon$2]])/MW^2 +
1395    (I*c3G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1396       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1397        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1398      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]],
1399       Index[Lorentz, mu$2]]*FSU3C[Index[Gluon, Gluon$1],
1400       Index[Gluon, Gluon$3], Index[Gluon, Gluon$2]])/MW^2 -
1401    (I*c3G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1402       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
1403        Index[Gluon, Gluon$3]], Index[Lorentz, mu$3]]*
1404      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]],
1405       Index[Lorentz, mu$1]]*FSU3C[Index[Gluon, Gluon$2],
1406       Index[Gluon, Gluon$3], Index[Gluon, Gluon$1]])/MW^2 +
1407    (I*c3G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1408       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1409        Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1410      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]],
1411       Index[Lorentz, mu$2]]*FSU3C[Index[Gluon, Gluon$2],
1412       Index[Gluon, Gluon$3], Index[Gluon, Gluon$1]])/MW^2 -
1413    (GH*H*(-del[G[mu, b], nu] + del[G[nu, b], mu] +
1414       gs*f[b, bb$76456, cc$76456]*G[mu, bb$76456]*G[nu, cc$76456])*
1415      (-del[G[mu, b], nu] + del[G[nu, b], mu] + gs*f[b, bb$76457, cc$76457]*
1416        G[mu, bb$76457]*G[nu, cc$76457]))/4 +
1417    (2*c2G*gs*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1418        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
1419      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]],
1420       Index[Lorentz, mu$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1421       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]])/
1422     MW^2 + gs*ghGbar[Index[Gluon, Gluon$1]] .
1423      del[ghG[Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1424     f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$1], Index[Gluon, Gluon$2]]*
1425     G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]] +
1426    (cG*dum^2*gs^3*vev^2*ghGbar[Index[Gluon, Gluon$1]] .
1427       del[ghG[Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1428      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$1], Index[Gluon, Gluon$2]]*
1429      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]])/MW^2 -
1430    (gs*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1431       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1432       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1433      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]])/2 -
1434    (3*cG*dum^2*gs^3*vev^2*del[G[Index[Lorentz, mu$1],
1435        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
1436      f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
1437      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1438      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]])/(2*MW^2) +
1439    (cG*dum^2*G0^2*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1440       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1441       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1442      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]])/MW^2 +
1443    (2*cG*dum^2*GP*GPbar*gs^3*del[G[Index[Lorentz, mu$1],
1444        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
1445      f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3], Index[Gluon, Gluon$1]]*
1446      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1447      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]])/MW^2 +
1448    (cG*dum^2*gs^3*H^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1449       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1450       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1451      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]])/MW^2 +
1452    (2*cG*dum^2*gs^3*H*vev*del[G[Index[Lorentz, mu$1],
1453        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
1454      f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3], Index[Gluon, Gluon$1]]*
1455      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1456      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]])/MW^2 +
1457    (cG*dum^2*gs^3*vev^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1458       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1459       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1460      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]])/MW^2 -
1461    (2*c2G*gs*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1462        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
1463      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]],
1464       Index[Lorentz, mu$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1465       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]])/
1466     MW^2 + (gs*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1467       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1468       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
1469      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]])/2 +
1470    (3*cG*dum^2*gs^3*vev^2*del[G[Index[Lorentz, mu$1],
1471        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
1472      f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
1473      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
1474      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]])/(2*MW^2) -
1475    (cG*dum^2*G0^2*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1476       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1477       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
1478      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]])/MW^2 -
1479    (2*cG*dum^2*GP*GPbar*gs^3*del[G[Index[Lorentz, mu$1],
1480        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
1481      f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3], Index[Gluon, Gluon$1]]*
1482      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
1483      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]])/MW^2 -
1484    (cG*dum^2*gs^3*H^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1485       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1486       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
1487      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]])/MW^2 -
1488    (2*cG*dum^2*gs^3*H*vev*del[G[Index[Lorentz, mu$1],
1489        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
1490      f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3], Index[Gluon, Gluon$1]]*
1491      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
1492      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]])/MW^2 -
1493    (cG*dum^2*gs^3*vev^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1494       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1495       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
1496      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]])/MW^2 +
1497    (c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1498       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1499        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1500      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$2], Index[Gluon, Gluon$5]]*
1501      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$1]]*
1502      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1503      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]])/MW^2 +
1504    (I*c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1505       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1506        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1507      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$2], Index[Gluon, Gluon$4]]*
1508      FSU3C[Index[Gluon, Gluon$5], Index[Gluon, Gluon$3],
1509       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1510      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]])/MW^2 -
1511    (I*c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1512       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1513        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1514      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$2], Index[Gluon, Gluon$4]]*
1515      FSU3C[Index[Gluon, Gluon$5], Index[Gluon, Gluon$3],
1516       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1517      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]])/MW^2 +
1518    (cG*dum^2*G0^2*gs^4*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1519       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
1520       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]]*
1521      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1522      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]]*
1523      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]])/(2*MW^2) +
1524    (cG*dum^2*GP*GPbar*gs^4*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1525       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
1526       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]]*
1527      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1528      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]]*
1529      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]])/MW^2 +
1530    (cG*dum^2*gs^4*H^2*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1531       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
1532       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]]*
1533      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1534      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]]*
1535      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]])/(2*MW^2) +
1536    (cG*dum^2*gs^4*H*vev*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1537       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
1538       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]]*
1539      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1540      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]]*
1541      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]])/MW^2 +
1542    (cG*dum^2*gs^4*vev^2*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1543       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
1544       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]]*
1545      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1546      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]]*
1547      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]])/(2*MW^2) -
1548    (gs^2*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1549       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$4],
1550       Index[Gluon, Gluon$5]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
1551      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1552      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1553      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]])/4 -
1554    (cG*dum^2*gs^4*vev^2*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1555       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$4],
1556       Index[Gluon, Gluon$5]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
1557      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1558      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1559      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]])/MW^2 +
1560    (2*c2G*gs*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1561        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
1562      del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]],
1563       Index[Lorentz, mu$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$3],
1564       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]])/
1565     MW^2 - (2*c2G*gs*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1566        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
1567      del[G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]],
1568       Index[Lorentz, mu$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$3],
1569       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]])/
1570     MW^2 - ((2*I)*c2G*gs*del[del[G[Index[Lorentz, mu$1],
1571         Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
1572      del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]],
1573       Index[Lorentz, mu$3]]*FSU3C[Index[Gluon, Gluon$3],
1574       Index[Gluon, Gluon$1], Index[Gluon, Gluon$2]]*
1575      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]])/MW^2 +
1576    ((2*I)*c2G*gs*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1577        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
1578      del[G[Index[Lorentz, mu$2], Index[Gluon, Gluon$2]],
1579       Index[Lorentz, mu$3]]*FSU3C[Index[Gluon, Gluon$3],
1580       Index[Gluon, Gluon$1], Index[Gluon, Gluon$2]]*
1581      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]])/MW^2 +
1582    ((2*I)*c2G*gs*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1583        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
1584      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]],
1585       Index[Lorentz, mu$1]]*FSU3C[Index[Gluon, Gluon$3],
1586       Index[Gluon, Gluon$1], Index[Gluon, Gluon$2]]*
1587      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]])/MW^2 -
1588    ((2*I)*c2G*gs*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1589        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
1590      del[G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]],
1591       Index[Lorentz, mu$2]]*FSU3C[Index[Gluon, Gluon$3],
1592       Index[Gluon, Gluon$1], Index[Gluon, Gluon$2]]*
1593      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]])/MW^2 -
1594    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1595       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
1596        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1597      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1598      FSU3C[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1599       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1600      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 +
1601    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1602       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1603        Index[Gluon, Gluon$2]], Index[Lorentz, mu$2]]*
1604      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1605      FSU3C[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1606       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1607      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 -
1608    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1609       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
1610        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1611      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1612      FSU3C[Index[Gluon, Gluon$3], Index[Gluon, Gluon$1],
1613       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1614      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 +
1615    (I*c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1616       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
1617        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1618      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$2]]*
1619      FSU3C[Index[Gluon, Gluon$5], Index[Gluon, Gluon$3],
1620       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1621      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 +
1622    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1623       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1624        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1625      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1626      FSU3C[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1627       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1628      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 -
1629    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1630       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1631        Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1632      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1633      FSU3C[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1634       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1635      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 -
1636    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1637       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1638        Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1639      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1640      FSU3C[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1641       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1642      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 +
1643    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1644       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1645        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1646      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1647      FSU3C[Index[Gluon, Gluon$3], Index[Gluon, Gluon$1],
1648       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1649      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 +
1650    (I*c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1651       Index[Lorentz, mu$1]]*del[G[Index[Lorentz, mu$2],
1652        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1653      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$1], Index[Gluon, Gluon$4]]*
1654      FSU3C[Index[Gluon, Gluon$5], Index[Gluon, Gluon$3],
1655       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1656      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 -
1657    ((2*I)*c2G*gs^2*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1658        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$1],
1659       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
1660      FSU3C[Index[Gluon, Gluon$4], Index[Gluon, Gluon$3],
1661       Index[Gluon, Gluon$5]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1662      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]]*
1663      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 +
1664    ((2*I)*c2G*gs^2*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1665        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*f[Index[Gluon, Gluon$1],
1666       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
1667      FSU3C[Index[Gluon, Gluon$4], Index[Gluon, Gluon$3],
1668       Index[Gluon, Gluon$5]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1669      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]]*
1670      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]])/MW^2 +
1671    (c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1672       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
1673        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1674      FSU3C[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4],
1675       Index[Gluon, Gluon$1]]*FSU3C[Index[Gluon, Gluon$5],
1676       Index[Gluon, Gluon$4], Index[Gluon, Gluon$2]]*
1677      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1678      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1679    (c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1680       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1681        Index[Gluon, Gluon$2]], Index[Lorentz, mu$2]]*
1682      FSU3C[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4],
1683       Index[Gluon, Gluon$1]]*FSU3C[Index[Gluon, Gluon$5],
1684       Index[Gluon, Gluon$4], Index[Gluon, Gluon$2]]*
1685      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1686      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1687    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1688       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1689        Index[Gluon, Gluon$2]], Index[Lorentz, mu$2]]*
1690      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1691      FSU3C[Index[Gluon, Gluon$1], Index[Gluon, Gluon$3],
1692       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1693      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1694    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1695       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
1696        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1697      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1698      FSU3C[Index[Gluon, Gluon$3], Index[Gluon, Gluon$2],
1699       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1700      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1701    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1702       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1703        Index[Gluon, Gluon$2]], Index[Lorentz, mu$2]]*
1704      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1705      FSU3C[Index[Gluon, Gluon$3], Index[Gluon, Gluon$2],
1706       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1707      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1708    (c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1709       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1710        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1711      FSU3C[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4],
1712       Index[Gluon, Gluon$1]]*FSU3C[Index[Gluon, Gluon$5],
1713       Index[Gluon, Gluon$4], Index[Gluon, Gluon$2]]*
1714      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1715      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1716    (c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1717       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1718        Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1719      FSU3C[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4],
1720       Index[Gluon, Gluon$1]]*FSU3C[Index[Gluon, Gluon$5],
1721       Index[Gluon, Gluon$4], Index[Gluon, Gluon$2]]*
1722      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1723      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1724    (c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1725       Index[Lorentz, mu$1]]*del[G[Index[Lorentz, mu$2],
1726        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1727      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$1], Index[Gluon, Gluon$4]]*
1728      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$5], Index[Gluon, Gluon$2]]*
1729      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1730      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1731    (c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1732       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1733        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1734      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$1]]*
1735      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$5], Index[Gluon, Gluon$2]]*
1736      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1737      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1738    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1739       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1740        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1741      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1742      FSU3C[Index[Gluon, Gluon$1], Index[Gluon, Gluon$3],
1743       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1744      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1745    (I*c3G*gs^4*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1746       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1747        Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1748      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
1749      FSU3C[Index[Gluon, Gluon$1], Index[Gluon, Gluon$3],
1750       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1751      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1752    (I*c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1753       Index[Lorentz, mu$1]]*del[G[Index[Lorentz, mu$2],
1754        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1755      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$1], Index[Gluon, Gluon$4]]*
1756      FSU3C[Index[Gluon, Gluon$5], Index[Gluon, Gluon$3],
1757       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1758      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1759    ((2*I)*c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1760       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
1761        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
1762      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$1]]*
1763      FSU3C[Index[Gluon, Gluon$5], Index[Gluon, Gluon$3],
1764       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1765      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1766    (I*c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1767       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
1768        Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
1769      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$1]]*
1770      FSU3C[Index[Gluon, Gluon$5], Index[Gluon, Gluon$3],
1771       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1772      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1773    (c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1774       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1775       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$5],
1776       Index[Gluon, Gluon$4], Index[Gluon, Gluon$6]]*
1777      FSU3C[Index[Gluon, Gluon$7], Index[Gluon, Gluon$2],
1778       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
1779      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$6]]*
1780      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]]*
1781      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1782    (c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1783       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1784       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$5],
1785       Index[Gluon, Gluon$4], Index[Gluon, Gluon$6]]*
1786      FSU3C[Index[Gluon, Gluon$7], Index[Gluon, Gluon$2],
1787       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
1788      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
1789      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]]*
1790      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1791    (c2G*gs^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1792       Index[Lorentz, mu$1]]*del[G[Index[Lorentz, mu$2],
1793        Index[Gluon, Gluon$2]], Index[Lorentz, mu$2]]*
1794      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$1], Index[Gluon, Gluon$4]]*
1795      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$2], Index[Gluon, Gluon$5]]*
1796      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1797      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1798    ((2*I)*c2G*gs^2*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1799        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$1],
1800       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
1801      FSU3C[Index[Gluon, Gluon$4], Index[Gluon, Gluon$2],
1802       Index[Gluon, Gluon$5]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1803      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1804      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 +
1805    ((2*I)*c2G*gs^2*del[del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1806        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*f[Index[Gluon, Gluon$1],
1807       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
1808      FSU3C[Index[Gluon, Gluon$4], Index[Gluon, Gluon$2],
1809       Index[Gluon, Gluon$5]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1810      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1811      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1812    (I*c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1813       Index[Lorentz, mu$1]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$1],
1814       Index[Gluon, Gluon$5]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1815       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$6],
1816       Index[Gluon, Gluon$3], Index[Gluon, Gluon$7]]*
1817      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$6]]*
1818      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
1819      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1820      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]])/MW^2 -
1821    (I*c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1822       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1823       Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$5],
1824       Index[Gluon, Gluon$1]]*FSU3C[Index[Gluon, Gluon$6],
1825       Index[Gluon, Gluon$4], Index[Gluon, Gluon$7]]*
1826      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
1827      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1828      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]]*
1829      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 -
1830    (c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1831       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1832       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$5],
1833       Index[Gluon, Gluon$2], Index[Gluon, Gluon$1]]*
1834      FSU3C[Index[Gluon, Gluon$6], Index[Gluon, Gluon$4],
1835       Index[Gluon, Gluon$7]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
1836      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1837      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]]*
1838      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 +
1839    (c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1840       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1841       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$5],
1842       Index[Gluon, Gluon$2], Index[Gluon, Gluon$1]]*
1843      FSU3C[Index[Gluon, Gluon$6], Index[Gluon, Gluon$4],
1844       Index[Gluon, Gluon$7]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1845      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
1846      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]]*
1847      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 +
1848    (I*c3G*gs^5*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1849       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1850       Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$6],
1851       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$1],
1852       Index[Gluon, Gluon$2], Index[Gluon, Gluon$5]]*
1853      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
1854      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1855      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1856      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 +
1857    (I*c3G*gs^5*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1858       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1859       Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$6],
1860       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$2],
1861       Index[Gluon, Gluon$5], Index[Gluon, Gluon$1]]*
1862      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
1863      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1864      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1865      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 -
1866    (I*c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1867       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1868       Index[Gluon, Gluon$1]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$4],
1869       Index[Gluon, Gluon$5]]*FSU3C[Index[Gluon, Gluon$6],
1870       Index[Gluon, Gluon$5], Index[Gluon, Gluon$7]]*
1871      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
1872      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1873      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1874      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 -
1875    (I*c3G*gs^5*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1876       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1877       Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$6],
1878       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$1],
1879       Index[Gluon, Gluon$2], Index[Gluon, Gluon$5]]*
1880      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1881      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
1882      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1883      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 -
1884    (I*c3G*gs^5*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1885       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1886       Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$6],
1887       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$2],
1888       Index[Gluon, Gluon$5], Index[Gluon, Gluon$1]]*
1889      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
1890      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
1891      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1892      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 -
1893    (I*c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1894       Index[Lorentz, mu$1]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$1],
1895       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$4],
1896       Index[Gluon, Gluon$5]]*FSU3C[Index[Gluon, Gluon$6],
1897       Index[Gluon, Gluon$5], Index[Gluon, Gluon$7]]*
1898      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1899      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
1900      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
1901      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 +
1902    (c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1903       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1904       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$5],
1905       Index[Gluon, Gluon$3], Index[Gluon, Gluon$6]]*
1906      FSU3C[Index[Gluon, Gluon$7], Index[Gluon, Gluon$2],
1907       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
1908      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1909      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]]*
1910      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 -
1911    (c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1912       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1913       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$5],
1914       Index[Gluon, Gluon$3], Index[Gluon, Gluon$6]]*
1915      FSU3C[Index[Gluon, Gluon$7], Index[Gluon, Gluon$2],
1916       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1917      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
1918      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]]*
1919      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]])/MW^2 -
1920    (I*c3G*gs^5*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1921       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1922       Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$6],
1923       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$2],
1924       Index[Gluon, Gluon$1], Index[Gluon, Gluon$5]]*
1925      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
1926      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1927      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]]*
1928      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$7]])/MW^2 +
1929    (I*c3G*gs^5*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1930       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1931       Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$6],
1932       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$2],
1933       Index[Gluon, Gluon$1], Index[Gluon, Gluon$5]]*
1934      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1935      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$6]]*
1936      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$3]]*
1937      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$7]])/MW^2 -
1938    (I*c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1939       Index[Lorentz, mu$1]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$1],
1940       Index[Gluon, Gluon$5]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1941       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$6],
1942       Index[Gluon, Gluon$4], Index[Gluon, Gluon$7]]*
1943      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1944      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$6]]*
1945      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]]*
1946      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$7]])/MW^2 -
1947    (I*c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1948       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1949       Index[Gluon, Gluon$1]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$4],
1950       Index[Gluon, Gluon$5]]*FSU3C[Index[Gluon, Gluon$6],
1951       Index[Gluon, Gluon$4], Index[Gluon, Gluon$7]]*
1952      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1953      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1954      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]]*
1955      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$7]])/MW^2 +
1956    (c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1957       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1958       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$5],
1959       Index[Gluon, Gluon$2], Index[Gluon, Gluon$1]]*
1960      FSU3C[Index[Gluon, Gluon$6], Index[Gluon, Gluon$3],
1961       Index[Gluon, Gluon$7]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$5]]*
1962      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
1963      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]]*
1964      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$7]])/MW^2 -
1965    (I*c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1966       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1967       Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$5],
1968       Index[Gluon, Gluon$1]]*FSU3C[Index[Gluon, Gluon$6],
1969       Index[Gluon, Gluon$3], Index[Gluon, Gluon$7]]*
1970      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1971      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1972      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]]*
1973      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$7]])/MW^2 -
1974    (c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1975       Index[Lorentz, mu$2]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
1976       Index[Gluon, Gluon$4]]*FSU3C[Index[Gluon, Gluon$5],
1977       Index[Gluon, Gluon$2], Index[Gluon, Gluon$1]]*
1978      FSU3C[Index[Gluon, Gluon$6], Index[Gluon, Gluon$3],
1979       Index[Gluon, Gluon$7]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
1980      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1981      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]]*
1982      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$7]])/MW^2 -
1983    (I*c2G*gs^3*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
1984       Index[Lorentz, mu$1]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$1],
1985       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$4],
1986       Index[Gluon, Gluon$5]]*FSU3C[Index[Gluon, Gluon$6],
1987       Index[Gluon, Gluon$4], Index[Gluon, Gluon$7]]*
1988      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
1989      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
1990      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]]*
1991      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$7]])/MW^2 -
1992    (c2G*gs^4*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
1993       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$4],
1994       Index[Gluon, Gluon$5]]*FSU3C[Index[Gluon, Gluon$6],
1995       Index[Gluon, Gluon$2], Index[Gluon, Gluon$7]]*
1996      FSU3C[Index[Gluon, Gluon$8], Index[Gluon, Gluon$5],
1997       Index[Gluon, Gluon$9]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
1998      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
1999      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2000      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$9]]*
2001      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2002      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]])/MW^2 -
2003    (c2G*cG^6*dum^12*gs^16*vev^12*f[Index[Gluon, Gluon$1],
2004       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
2005       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2006      FSU3C[Index[Gluon, Gluon$6], Index[Gluon, Gluon$2],
2007       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$8],
2008       Index[Gluon, Gluon$5], Index[Gluon, Gluon$9]]*
2009      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
2010      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
2011      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2012      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$9]]*
2013      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2014      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]])/MW^14 -
2015    (c2G*gs^4*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2016       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$4],
2017       Index[Gluon, Gluon$5]]*FSU3C[Index[Gluon, Gluon$6],
2018       Index[Gluon, Gluon$3], Index[Gluon, Gluon$7]]*
2019      FSU3C[Index[Gluon, Gluon$8], Index[Gluon, Gluon$5],
2020       Index[Gluon, Gluon$9]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2021      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
2022      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
2023      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$9]]*
2024      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2025      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]])/MW^2 -
2026    (c2G*cG^6*dum^12*gs^16*vev^12*f[Index[Gluon, Gluon$1],
2027       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
2028       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2029      FSU3C[Index[Gluon, Gluon$6], Index[Gluon, Gluon$3],
2030       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$8],
2031       Index[Gluon, Gluon$5], Index[Gluon, Gluon$9]]*
2032      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2033      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
2034      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
2035      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$9]]*
2036      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2037      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]])/MW^14 -
2038    (I*c3G*gs^6*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2039       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
2040       Index[Gluon, Gluon$6]]*f[Index[Gluon, Gluon$7], Index[Gluon, Gluon$8],
2041       Index[Gluon, Gluon$9]]*FSU3C[Index[Gluon, Gluon$1],
2042       Index[Gluon, Gluon$4], Index[Gluon, Gluon$7]]*
2043      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2044      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$9]]*
2045      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2046      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
2047      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]]*
2048      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]])/MW^2 -
2049    (I*c3G*cG^6*dum^12*gs^18*vev^12*f[Index[Gluon, Gluon$1],
2050       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4],
2051       Index[Gluon, Gluon$5], Index[Gluon, Gluon$6]]*f[Index[Gluon, Gluon$7],
2052       Index[Gluon, Gluon$8], Index[Gluon, Gluon$9]]*
2053      FSU3C[Index[Gluon, Gluon$1], Index[Gluon, Gluon$4],
2054       Index[Gluon, Gluon$7]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2055      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$9]]*
2056      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2057      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
2058      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$6]]*
2059      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]])/MW^14 -
2060    (c2G*gs^4*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2061       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$4],
2062       Index[Gluon, Gluon$5]]*FSU3C[Index[Gluon, Gluon$6],
2063       Index[Gluon, Gluon$2], Index[Gluon, Gluon$7]]*
2064      FSU3C[Index[Gluon, Gluon$8], Index[Gluon, Gluon$4],
2065       Index[Gluon, Gluon$9]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
2066      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
2067      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2068      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
2069      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]]*
2070      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$9]])/MW^2 -
2071    (c2G*cG^6*dum^12*gs^16*vev^12*f[Index[Gluon, Gluon$1],
2072       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
2073       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2074      FSU3C[Index[Gluon, Gluon$6], Index[Gluon, Gluon$2],
2075       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$8],
2076       Index[Gluon, Gluon$4], Index[Gluon, Gluon$9]]*
2077      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
2078      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
2079      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2080      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
2081      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]]*
2082      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$9]])/MW^14 -
2083    (c2G*gs^4*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2084       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$4],
2085       Index[Gluon, Gluon$5]]*FSU3C[Index[Gluon, Gluon$6],
2086       Index[Gluon, Gluon$3], Index[Gluon, Gluon$7]]*
2087      FSU3C[Index[Gluon, Gluon$8], Index[Gluon, Gluon$4],
2088       Index[Gluon, Gluon$9]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2089      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
2090      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
2091      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
2092      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]]*
2093      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$9]])/MW^2 -
2094    (c2G*cG^6*dum^12*gs^16*vev^12*f[Index[Gluon, Gluon$1],
2095       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
2096       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2097      FSU3C[Index[Gluon, Gluon$6], Index[Gluon, Gluon$3],
2098       Index[Gluon, Gluon$7]]*FSU3C[Index[Gluon, Gluon$8],
2099       Index[Gluon, Gluon$4], Index[Gluon, Gluon$9]]*
2100      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2101      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$6]]*
2102      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$5]]*
2103      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$7]]*
2104      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]]*
2105      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$9]])/MW^14 -
2106    (dum^2*G0^2*gs^3*tcG*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2107       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2108       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1],
2109       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
2110      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]]*
2111      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]])/MW^2 -
2112    (2*dum^2*GP*GPbar*gs^3*tcG*del[G[Index[Lorentz, mu$1],
2113        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
2114      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
2115       Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2116       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]]*
2117      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]])/MW^2 -
2118    (dum^2*gs^3*H^2*tcG*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2119       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2120       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1],
2121       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
2122      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]]*
2123      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]])/MW^2 -
2124    (2*dum^2*gs^3*H*tcG*vev*del[G[Index[Lorentz, mu$1],
2125        Index[Gluon, Gluon$1]], Index[Lorentz, mu$2]]*
2126      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
2127       Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2128       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]]*
2129      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]])/MW^2 -
2130    (dum^2*gs^3*tcG*vev^2*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2131       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2132       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1],
2133       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
2134      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]]*
2135      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$3]])/MW^2 +
2136    (dum^2*G0^2*gs^4*tcG*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2137       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1],
2138       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
2139       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2140      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2141      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2142      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2143      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$5]])/(4*MW^2) +
2144    (dum^2*GP*GPbar*gs^4*tcG*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2145       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1],
2146       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
2147       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2148      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2149      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2150      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2151      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$5]])/(2*MW^2) +
2152    (dum^2*gs^4*H^2*tcG*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2153       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1],
2154       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
2155       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2156      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2157      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2158      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2159      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$5]])/(4*MW^2) +
2160    (dum^2*gs^4*H*tcG*vev*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2161       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1],
2162       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
2163       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2164      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2165      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2166      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2167      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$5]])/(2*MW^2) +
2168    (dum^2*gs^4*tcG*vev^2*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2169       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1],
2170       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$1],
2171       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2172      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$2]]*
2173      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2174      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2175      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$5]])/(4*MW^2) -
2176    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2177       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
2178        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
2179      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
2180       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4],
2181       Index[Gluon, Gluon$5]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$1],
2182       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
2183      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$3]])/(2*MW^2) +
2184    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2185       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
2186        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
2187      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
2188       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4],
2189       Index[Gluon, Gluon$5]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$1],
2190       Index[Gluon, Gluon$2]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
2191      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$3]])/(2*MW^2) -
2192    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2193       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
2194        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
2195      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
2196       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4],
2197       Index[Gluon, Gluon$5]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$2],
2198       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2199      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$3]])/(2*MW^2) +
2200    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2201       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
2202        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
2203      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
2204       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4],
2205       Index[Gluon, Gluon$5]]*f[Index[Gluon, Gluon$5], Index[Gluon, Gluon$2],
2206       Index[Gluon, Gluon$1]]*G[Index[Lorentz, mu$4], Index[Gluon, Gluon$4]]*
2207      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$3]])/(2*MW^2) -
2208    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2209       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
2210        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
2211      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
2212       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$3],
2213       Index[Gluon, Gluon$2]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
2214       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
2215      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$5]])/(2*MW^2) +
2216    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2217       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
2218        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
2219      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
2220       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$3],
2221       Index[Gluon, Gluon$2]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
2222       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
2223      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$5]])/MW^2 -
2224    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2225       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
2226        Index[Gluon, Gluon$2]], Index[Lorentz, mu$4]]*
2227      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
2228       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$2], Index[Gluon, Gluon$3],
2229       Index[Gluon, Gluon$1]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
2230       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$3], Index[Gluon, Gluon$4]]*
2231      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$5]])/(2*MW^2) +
2232    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2233       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$2],
2234        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
2235      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
2236       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2237       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
2238       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$4], Index[Gluon, Gluon$4]]*
2239      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$5]])/(2*MW^2) -
2240    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2241       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
2242        Index[Gluon, Gluon$2]], Index[Lorentz, mu$2]]*
2243      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
2244       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2245       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
2246       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$4], Index[Gluon, Gluon$4]]*
2247      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$5]])/(2*MW^2) -
2248    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2249       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$1],
2250        Index[Gluon, Gluon$2]], Index[Lorentz, mu$3]]*
2251      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
2252       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2253       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
2254       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$4], Index[Gluon, Gluon$4]]*
2255      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$5]])/(2*MW^2) +
2256    (gs^4*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2257       Index[Lorentz, mu$2]]*del[G[Index[Lorentz, mu$3],
2258        Index[Gluon, Gluon$2]], Index[Lorentz, mu$1]]*
2259      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
2260       Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2],
2261       Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4], Index[Gluon, Gluon$5],
2262       Index[Gluon, Gluon$3]]*G[Index[Lorentz, mu$4], Index[Gluon, Gluon$4]]*
2263      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$5]])/(2*MW^2) -
2264    (gs^6*tc3G*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2265       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$1],
2266       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$3],
2267       Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*f[Index[Gluon, Gluon$6],
2268       Index[Gluon, Gluon$7], Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$8],
2269       Index[Gluon, Gluon$9], Index[Gluon, Gluon$5]]*
2270      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
2271      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$1]]*
2272      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]]*
2273      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$9]]*
2274      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$2]]*
2275      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$6]])/(2*MW^2) -
2276    (cG^6*dum^12*gs^18*tc3G*vev^12*Eps[Index[Lorentz, mu$1],
2277       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
2278      f[Index[Gluon, Gluon$1], Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*
2279      f[Index[Gluon, Gluon$3], Index[Gluon, Gluon$4], Index[Gluon, Gluon$5]]*
2280      f[Index[Gluon, Gluon$6], Index[Gluon, Gluon$7], Index[Gluon, Gluon$4]]*
2281      f[Index[Gluon, Gluon$8], Index[Gluon, Gluon$9], Index[Gluon, Gluon$5]]*
2282      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$7]]*
2283      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$1]]*
2284      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$8]]*
2285      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$9]]*
2286      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$2]]*
2287      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$6]])/(2*MW^14) +
2288    (gs^5*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2289       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
2290       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*f[Index[Gluon, Gluon$2],
2291       Index[Gluon, Gluon$3], Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$4],
2292       Index[Gluon, Gluon$5], Index[Gluon, Gluon$1]]*f[Index[Gluon, Gluon$6],
2293       Index[Gluon, Gluon$7], Index[Gluon, Gluon$5]]*
2294      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$7]]*
2295      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$2]]*
2296      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$3]]*
2297      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$6]])/MW^2 +
2298    (gs^5*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2299       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
2300       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$2],
2301       Index[Gluon, Gluon$3], Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$4],
2302       Index[Gluon, Gluon$1], Index[Gluon, Gluon$5]]*f[Index[Gluon, Gluon$6],
2303       Index[Gluon, Gluon$7], Index[Gluon, Gluon$5]]*
2304      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$3]]*
2305      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]]*
2306      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$6]]*
2307      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$7]])/(2*MW^2) -
2308    (gs^5*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2309       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
2310       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$2],
2311       Index[Gluon, Gluon$3], Index[Gluon, Gluon$4]]*f[Index[Gluon, Gluon$4],
2312       Index[Gluon, Gluon$1], Index[Gluon, Gluon$5]]*f[Index[Gluon, Gluon$6],
2313       Index[Gluon, Gluon$7], Index[Gluon, Gluon$5]]*
2314      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$3]]*
2315      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$2]]*
2316      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$6]]*
2317      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$7]])/(2*MW^2) +
2318    (gs^5*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2319       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
2320       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1],
2321       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4],
2322       Index[Gluon, Gluon$5], Index[Gluon, Gluon$2]]*f[Index[Gluon, Gluon$6],
2323       Index[Gluon, Gluon$7], Index[Gluon, Gluon$3]]*
2324      G[Index[Lorentz, mu$1], Index[Gluon, Gluon$4]]*
2325      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]]*
2326      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$6]]*
2327      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$7]])/(2*MW^2) -
2328    (gs^5*tc3G*del[G[Index[Lorentz, mu$1], Index[Gluon, Gluon$1]],
2329       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
2330       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*f[Index[Gluon, Gluon$1],
2331       Index[Gluon, Gluon$2], Index[Gluon, Gluon$3]]*f[Index[Gluon, Gluon$4],
2332       Index[Gluon, Gluon$5], Index[Gluon, Gluon$2]]*f[Index[Gluon, Gluon$6],
2333       Index[Gluon, Gluon$7], Index[Gluon, Gluon$3]]*
2334      G[Index[Lorentz, mu$2], Index[Gluon, Gluon$4]]*
2335      G[Index[Lorentz, mu$3], Index[Gluon, Gluon$5]]*
2336      G[Index[Lorentz, mu$4], Index[Gluon, Gluon$6]]*
2337      G[Index[Lorentz, mu$5], Index[Gluon, Gluon$7]])/(2*MW^2) +
2338    (I*G0*Conjugate[yd[Index[Generation, Generation$1],
2339        Index[Generation, Generation$2]]]*
2340      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2341        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2342        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2343      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] +
2344    ((I/2)*cd*G0*Conjugate[yd[Index[Generation, Generation$1],
2345        Index[Generation, Generation$2]]]*
2346      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2347        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2348        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2349      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] -
2350    (H*Conjugate[yd[Index[Generation, Generation$1], Index[Generation,
2351         Generation$2]]]*dqbar[Index[Spin, SP$1], Index[Generation,
2352         Generation$2], Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2353        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2354      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] -
2355    (3*cd*H*Conjugate[yd[Index[Generation, Generation$1],
2356        Index[Generation, Generation$2]]]*
2357      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2358        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2359        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2360      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]) +
2361    (cH*H*Conjugate[yd[Index[Generation, Generation$1],
2362        Index[Generation, Generation$2]]]*
2363      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2364        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2365        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2366      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]) +
2367    ((I/2)*cd*G0^3*Conjugate[yd[Index[Generation, Generation$1],
2368        Index[Generation, Generation$2]]]*
2369      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2370        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2371        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2372      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) +
2373    (I*cd*G0*GP*GPbar*Conjugate[yd[Index[Generation, Generation$1],
2374        Index[Generation, Generation$2]]]*
2375      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2376        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2377        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2378      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) -
2379    (cd*G0^2*H*Conjugate[yd[Index[Generation, Generation$1],
2380        Index[Generation, Generation$2]]]*
2381      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2382        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2383        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2384      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev^2) -
2385    (cd*GP*GPbar*H*Conjugate[yd[Index[Generation, Generation$1],
2386        Index[Generation, Generation$2]]]*
2387      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2388        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2389        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2390      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) +
2391    ((I/2)*cd*G0*H^2*Conjugate[yd[Index[Generation, Generation$1],
2392        Index[Generation, Generation$2]]]*
2393      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2394        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2395        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2396      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) -
2397    (cd*H^3*Conjugate[yd[Index[Generation, Generation$1],
2398        Index[Generation, Generation$2]]]*
2399      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2400        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2401        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2402      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev^2) -
2403    (cd*G0^2*Conjugate[yd[Index[Generation, Generation$1],
2404        Index[Generation, Generation$2]]]*
2405      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2406        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2407        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2408      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev) -
2409    (cd*GP*GPbar*Conjugate[yd[Index[Generation, Generation$1],
2410        Index[Generation, Generation$2]]]*
2411      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2412        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2413        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2414      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev) +
2415    (I*cd*G0*H*Conjugate[yd[Index[Generation, Generation$1],
2416        Index[Generation, Generation$2]]]*
2417      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2418        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2419        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2420      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev) -
2421    (3*cd*H^2*Conjugate[yd[Index[Generation, Generation$1],
2422        Index[Generation, Generation$2]]]*
2423      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2424        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2425        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2426      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev) -
2427    (vev*Conjugate[yd[Index[Generation, Generation$1],
2428        Index[Generation, Generation$2]]]*
2429      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2430        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2431        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2432      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] -
2433    (cd*vev*Conjugate[yd[Index[Generation, Generation$1],
2434        Index[Generation, Generation$2]]]*
2435      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2436        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2437        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2438      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]) -
2439    I*GPbar*Conjugate[CKM[Index[Generation, Generation$1],
2440       Index[Generation, Generation$2]]]*
2441     Conjugate[yd[Index[Generation, Generation$2], Index[Generation,
2442        Generation$3]]]*dqbar[Index[Spin, SP$1], Index[Generation,
2443        Generation$3], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2444       Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2445     ProjM[Index[Spin, SP$1], Index[Spin, SP$2]] -
2446    (I/2)*cd*GPbar*Conjugate[CKM[Index[Generation, Generation$1],
2447       Index[Generation, Generation$2]]]*
2448     Conjugate[yd[Index[Generation, Generation$2], Index[Generation,
2449        Generation$3]]]*dqbar[Index[Spin, SP$1], Index[Generation,
2450        Generation$3], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2451       Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2452     ProjM[Index[Spin, SP$1], Index[Spin, SP$2]] -
2453    ((I/2)*cd*G0^2*GPbar*Conjugate[CKM[Index[Generation, Generation$1],
2454        Index[Generation, Generation$2]]]*
2455      Conjugate[yd[Index[Generation, Generation$2], Index[Generation,
2456         Generation$3]]]*dqbar[Index[Spin, SP$1], Index[Generation,
2457         Generation$3], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2458        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2459      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev^2 -
2460    (I*cd*GP*GPbar^2*Conjugate[CKM[Index[Generation, Generation$1],
2461        Index[Generation, Generation$2]]]*
2462      Conjugate[yd[Index[Generation, Generation$2], Index[Generation,
2463         Generation$3]]]*dqbar[Index[Spin, SP$1], Index[Generation,
2464         Generation$3], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2465        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2466      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev^2 -
2467    ((I/2)*cd*GPbar*H^2*Conjugate[CKM[Index[Generation, Generation$1],
2468        Index[Generation, Generation$2]]]*
2469      Conjugate[yd[Index[Generation, Generation$2], Index[Generation,
2470         Generation$3]]]*dqbar[Index[Spin, SP$1], Index[Generation,
2471         Generation$3], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2472        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2473      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev^2 -
2474    (I*cd*GPbar*H*Conjugate[CKM[Index[Generation, Generation$1],
2475        Index[Generation, Generation$2]]]*
2476      Conjugate[yd[Index[Generation, Generation$2], Index[Generation,
2477         Generation$3]]]*dqbar[Index[Spin, SP$1], Index[Generation,
2478         Generation$3], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2479        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2480      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev +
2481    (I*G0*Conjugate[yl[Index[Generation, Generation$1],
2482        Index[Generation, Generation$2]]]*
2483      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2484       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2485      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] +
2486    ((I/2)*cl*G0*Conjugate[yl[Index[Generation, Generation$1],
2487        Index[Generation, Generation$2]]]*
2488      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2489       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2490      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] -
2491    (H*Conjugate[yl[Index[Generation, Generation$1], Index[Generation,
2492         Generation$2]]]*lbar[Index[Spin, SP$1], Index[Generation,
2493         Generation$2]] . l[Index[Spin, SP$2], Index[Generation,
2494         Generation$1]]*ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/
2495     Sqrt[2] + (cH*H*Conjugate[yl[Index[Generation, Generation$1],
2496        Index[Generation, Generation$2]]]*
2497      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2498       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2499      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]) -
2500    (3*cl*H*Conjugate[yl[Index[Generation, Generation$1],
2501        Index[Generation, Generation$2]]]*
2502      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2503       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2504      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]) +
2505    ((I/2)*cl*G0^3*Conjugate[yl[Index[Generation, Generation$1],
2506        Index[Generation, Generation$2]]]*
2507      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2508       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2509      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) +
2510    (I*cl*G0*GP*GPbar*Conjugate[yl[Index[Generation, Generation$1],
2511        Index[Generation, Generation$2]]]*
2512      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2513       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2514      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) -
2515    (cl*G0^2*H*Conjugate[yl[Index[Generation, Generation$1],
2516        Index[Generation, Generation$2]]]*
2517      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2518       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2519      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev^2) -
2520    (cl*GP*GPbar*H*Conjugate[yl[Index[Generation, Generation$1],
2521        Index[Generation, Generation$2]]]*
2522      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2523       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2524      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) +
2525    ((I/2)*cl*G0*H^2*Conjugate[yl[Index[Generation, Generation$1],
2526        Index[Generation, Generation$2]]]*
2527      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2528       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2529      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) -
2530    (cl*H^3*Conjugate[yl[Index[Generation, Generation$1],
2531        Index[Generation, Generation$2]]]*
2532      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2533       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2534      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev^2) -
2535    (cl*G0^2*Conjugate[yl[Index[Generation, Generation$1],
2536        Index[Generation, Generation$2]]]*
2537      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2538       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2539      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev) -
2540    (cl*GP*GPbar*Conjugate[yl[Index[Generation, Generation$1],
2541        Index[Generation, Generation$2]]]*
2542      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2543       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2544      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev) +
2545    (I*cl*G0*H*Conjugate[yl[Index[Generation, Generation$1],
2546        Index[Generation, Generation$2]]]*
2547      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2548       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2549      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev) -
2550    (3*cl*H^2*Conjugate[yl[Index[Generation, Generation$1],
2551        Index[Generation, Generation$2]]]*
2552      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2553       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2554      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev) -
2555    (vev*Conjugate[yl[Index[Generation, Generation$1],
2556        Index[Generation, Generation$2]]]*
2557      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2558       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2559      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] -
2560    (cl*vev*Conjugate[yl[Index[Generation, Generation$1],
2561        Index[Generation, Generation$2]]]*
2562      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2563       l[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2564      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]) -
2565    I*GPbar*Conjugate[yl[Index[Generation, Generation$1],
2566       Index[Generation, Generation$2]]]*
2567     lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2568      vl[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2569     ProjM[Index[Spin, SP$1], Index[Spin, SP$2]] -
2570    (I/2)*cl*GPbar*Conjugate[yl[Index[Generation, Generation$1],
2571       Index[Generation, Generation$2]]]*
2572     lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2573      vl[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2574     ProjM[Index[Spin, SP$1], Index[Spin, SP$2]] -
2575    ((I/2)*cl*G0^2*GPbar*Conjugate[yl[Index[Generation, Generation$1],
2576        Index[Generation, Generation$2]]]*
2577      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2578       vl[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2579      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev^2 -
2580    (I*cl*GP*GPbar^2*Conjugate[yl[Index[Generation, Generation$1],
2581        Index[Generation, Generation$2]]]*
2582      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2583       vl[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2584      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev^2 -
2585    ((I/2)*cl*GPbar*H^2*Conjugate[yl[Index[Generation, Generation$1],
2586        Index[Generation, Generation$2]]]*
2587      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2588       vl[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2589      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev^2 -
2590    (I*cl*GPbar*H*Conjugate[yl[Index[Generation, Generation$1],
2591        Index[Generation, Generation$2]]]*
2592      lbar[Index[Spin, SP$1], Index[Generation, Generation$2]] .
2593       vl[Index[Spin, SP$2], Index[Generation, Generation$1]]*
2594      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev -
2595    (I*G0*Conjugate[yu[Index[Generation, Generation$1],
2596        Index[Generation, Generation$2]]]*
2597      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2598        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2599        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2600      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] -
2601    ((I/2)*cu*G0*Conjugate[yu[Index[Generation, Generation$1],
2602        Index[Generation, Generation$2]]]*
2603      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2604        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2605        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2606      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] -
2607    (H*Conjugate[yu[Index[Generation, Generation$1], Index[Generation,
2608         Generation$2]]]*uqbar[Index[Spin, SP$1], Index[Generation,
2609         Generation$2], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2610        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2611      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] +
2612    (cH*H*Conjugate[yu[Index[Generation, Generation$1],
2613        Index[Generation, Generation$2]]]*
2614      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2615        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2616        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2617      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]) -
2618    (3*cu*H*Conjugate[yu[Index[Generation, Generation$1],
2619        Index[Generation, Generation$2]]]*
2620      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2621        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2622        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2623      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]) -
2624    ((I/2)*cu*G0^3*Conjugate[yu[Index[Generation, Generation$1],
2625        Index[Generation, Generation$2]]]*
2626      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2627        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2628        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2629      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) -
2630    (I*cu*G0*GP*GPbar*Conjugate[yu[Index[Generation, Generation$1],
2631        Index[Generation, Generation$2]]]*
2632      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2633        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2634        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2635      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) -
2636    (cu*G0^2*H*Conjugate[yu[Index[Generation, Generation$1],
2637        Index[Generation, Generation$2]]]*
2638      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2639        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2640        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2641      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev^2) -
2642    (cu*GP*GPbar*H*Conjugate[yu[Index[Generation, Generation$1],
2643        Index[Generation, Generation$2]]]*
2644      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2645        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2646        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2647      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) -
2648    ((I/2)*cu*G0*H^2*Conjugate[yu[Index[Generation, Generation$1],
2649        Index[Generation, Generation$2]]]*
2650      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2651        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2652        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2653      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev^2) -
2654    (cu*H^3*Conjugate[yu[Index[Generation, Generation$1],
2655        Index[Generation, Generation$2]]]*
2656      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2657        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2658        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2659      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev^2) -
2660    (cu*G0^2*Conjugate[yu[Index[Generation, Generation$1],
2661        Index[Generation, Generation$2]]]*
2662      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2663        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2664        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2665      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev) -
2666    (cu*GP*GPbar*Conjugate[yu[Index[Generation, Generation$1],
2667        Index[Generation, Generation$2]]]*
2668      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2669        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2670        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2671      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev) -
2672    (I*cu*G0*H*Conjugate[yu[Index[Generation, Generation$1],
2673        Index[Generation, Generation$2]]]*
2674      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2675        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2676        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2677      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(Sqrt[2]*vev) -
2678    (3*cu*H^2*Conjugate[yu[Index[Generation, Generation$1],
2679        Index[Generation, Generation$2]]]*
2680      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2681        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2682        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2683      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]*vev) -
2684    (vev*Conjugate[yu[Index[Generation, Generation$1],
2685        Index[Generation, Generation$2]]]*
2686      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2687        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2688        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2689      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/Sqrt[2] -
2690    (cu*vev*Conjugate[yu[Index[Generation, Generation$1],
2691        Index[Generation, Generation$2]]]*
2692      uqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
2693        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
2694        Index[Generation, Generation$1], Index[Colour, Colour$1]]*
2695      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/(2*Sqrt[2]) -
2696    I*GP*CKM[Index[Generation, Generation$1], Index[Generation,
2697       Generation$2]]*Conjugate[yu[Index[Generation, Generation$1],
2698       Index[Generation, Generation$3]]]*
2699     uqbar[Index[Spin, SP$1], Index[Generation, Generation$3],
2700       Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2701       Index[Generation, Generation$2], Index[Colour, Colour$1]]*
2702     ProjM[Index[Spin, SP$1], Index[Spin, SP$2]] -
2703    (I/2)*cu*GP*CKM[Index[Generation, Generation$1],
2704      Index[Generation, Generation$2]]*
2705     Conjugate[yu[Index[Generation, Generation$1], Index[Generation,
2706        Generation$3]]]*uqbar[Index[Spin, SP$1], Index[Generation,
2707        Generation$3], Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2708       Index[Generation, Generation$2], Index[Colour, Colour$1]]*
2709     ProjM[Index[Spin, SP$1], Index[Spin, SP$2]] -
2710    ((I/2)*cu*G0^2*GP*CKM[Index[Generation, Generation$1],
2711       Index[Generation, Generation$2]]*Conjugate[
2712       yu[Index[Generation, Generation$1], Index[Generation, Generation$3]]]*
2713      uqbar[Index[Spin, SP$1], Index[Generation, Generation$3],
2714        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2715        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
2716      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev^2 -
2717    (I*cu*GP^2*GPbar*CKM[Index[Generation, Generation$1],
2718       Index[Generation, Generation$2]]*Conjugate[
2719       yu[Index[Generation, Generation$1], Index[Generation, Generation$3]]]*
2720      uqbar[Index[Spin, SP$1], Index[Generation, Generation$3],
2721        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2722        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
2723      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev^2 -
2724    ((I/2)*cu*GP*H^2*CKM[Index[Generation, Generation$1],
2725       Index[Generation, Generation$2]]*Conjugate[
2726       yu[Index[Generation, Generation$1], Index[Generation, Generation$3]]]*
2727      uqbar[Index[Spin, SP$1], Index[Generation, Generation$3],
2728        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2729        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
2730      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev^2 -
2731    (I*cu*GP*H*CKM[Index[Generation, Generation$1], Index[Generation,
2732        Generation$2]]*Conjugate[yu[Index[Generation, Generation$1],
2733        Index[Generation, Generation$3]]]*
2734      uqbar[Index[Spin, SP$1], Index[Generation, Generation$3],
2735        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
2736        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
2737      ProjM[Index[Spin, SP$1], Index[Spin, SP$2]])/vev -
2738    (ee^2*G0*GPbar*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/(2*sw) +
2739    ((I/2)*ee^2*GPbar*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/sw -
2740    ((I/4)*cH*ee^2*GPbar*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2741     sw + (2*cT*ee^2*G0*GP*GPbar^2*A[Index[Lorentz, mu$1]]*
2742      W[Index[Lorentz, mu$1]])/(sw*vev^2) -
2743    ((2*I)*cT*ee^2*GP*GPbar^2*H*A[Index[Lorentz, mu$1]]*
2744      W[Index[Lorentz, mu$1]])/(sw*vev^2) -
2745    ((2*I)*cT*ee^2*GP*GPbar^2*A[Index[Lorentz, mu$1]]*
2746      W[Index[Lorentz, mu$1]])/(sw*vev) +
2747    ((I/2)*ee^2*GPbar*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2748     sw - (cA*ee^4*G0*GPbar*vev^2*A[Index[Lorentz, mu$1]]*
2749      W[Index[Lorentz, mu$1]])/(2*MW^2*sw) +
2750    ((I/2)*cA*ee^4*GPbar*H*vev^2*A[Index[Lorentz, mu$1]]*
2751      W[Index[Lorentz, mu$1]])/(MW^2*sw) +
2752    ((I/2)*cA*ee^4*GPbar*vev^3*A[Index[Lorentz, mu$1]]*
2753      W[Index[Lorentz, mu$1]])/(MW^2*sw) -
2754    (cWW*ee^4*G0*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
2755      W[Index[Lorentz, mu$1]])/(2*MW^2*sw) +
2756    ((I/2)*cWW*ee^4*GPbar*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
2757      W[Index[Lorentz, mu$1]])/(MW^2*sw) +
2758    ((I/2)*cWW*ee^4*GPbar*vev*A[Index[Lorentz, mu$1]]*
2759      A[Index[Lorentz, mu$2]]^2*W[Index[Lorentz, mu$1]])/(MW^2*sw) -
2760    ((I/2)*ee*GPbar*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2761     sw + (I*cT*ee*GPbar*del[G0, Index[Lorentz, mu$1]]*
2762      W[Index[Lorentz, mu$1]])/sw -
2763    (cT*ee*G0*GPbar*H*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2764     (sw*vev^2) + (I*cT*ee*GPbar*H^2*del[G0, Index[Lorentz, mu$1]]*
2765      W[Index[Lorentz, mu$1]])/(sw*vev^2) -
2766    (cT*ee*G0*GPbar*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2767     (sw*vev) + ((2*I)*cT*ee*GPbar*H*del[G0, Index[Lorentz, mu$1]]*
2768      W[Index[Lorentz, mu$1]])/(sw*vev) +
2769    (I*cHW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2770      del[G0, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/(MW^2*sw) +
2771    (I*cT*ee*G0*GPbar^2*del[GP, Index[Lorentz, mu$1]]*
2772      W[Index[Lorentz, mu$1]])/(sw*vev^2) +
2773    (cT*ee*GPbar^2*H*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2774     (sw*vev^2) + (cT*ee*GPbar^2*del[GP, Index[Lorentz, mu$1]]*
2775      W[Index[Lorentz, mu$1]])/(sw*vev) +
2776    ((I/2)*ee*G0*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2777     sw + (ee*H*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2778     (2*sw) - (cH*ee*H*del[GPbar, Index[Lorentz, mu$1]]*
2779      W[Index[Lorentz, mu$1]])/(4*sw) -
2780    (I*cT*ee*G0*GP*GPbar*del[GPbar, Index[Lorentz, mu$1]]*
2781      W[Index[Lorentz, mu$1]])/(sw*vev^2) -
2782    (cT*ee*GP*GPbar*H*del[GPbar, Index[Lorentz, mu$1]]*
2783      W[Index[Lorentz, mu$1]])/(sw*vev^2) -
2784    (cT*ee*GP*GPbar*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2785     (sw*vev) + (ee*vev*del[GPbar, Index[Lorentz, mu$1]]*
2786      W[Index[Lorentz, mu$1]])/(2*sw) -
2787    (ee*GPbar*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/(2*sw) +
2788    (cH*ee*GPbar*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2789     (4*sw) + (cT*ee*G0^2*GPbar*del[H, Index[Lorentz, mu$1]]*
2790      W[Index[Lorentz, mu$1]])/(sw*vev^2) -
2791    (I*cT*ee*G0*GPbar*H*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]])/
2792     (sw*vev^2) - (I*cT*ee*G0*GPbar*del[H, Index[Lorentz, mu$1]]*
2793      W[Index[Lorentz, mu$1]])/(sw*vev) +
2794    (cHW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2795      del[H, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/(MW^2*sw) -
2796    ((I/2)*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
2797      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2798      W[Index[Lorentz, mu$1]])/(MW^2*sw) -
2799    (cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
2800       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
2801    (cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
2802       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/(2*MW^2*sw) +
2803    (cWW*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
2804      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2805      W[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
2806    (cWW*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
2807      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2808      W[Index[Lorentz, mu$1]])/(2*MW^2*sw) +
2809    ((I/2)*cWW*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
2810      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2811      W[Index[Lorentz, mu$1]])/(MW^2*sw) +
2812    ((I/2)*cWW*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
2813      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2814      W[Index[Lorentz, mu$1]])/(MW^2*sw) -
2815    ((I/2)*cWW*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
2816      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2817      W[Index[Lorentz, mu$1]])/(MW^2*sw) +
2818    (cB*ee^2*G0*GPbar*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
2819       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
2820    ((I/2)*cB*ee^2*GPbar*H*del[del[A[Index[Lorentz, mu$1]],
2821        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/
2822     (MW^2*sw) - ((I/2)*cB*ee^2*GPbar*vev*del[del[A[Index[Lorentz, mu$1]],
2823        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/
2824     (MW^2*sw) - (cWW*ee^2*G0^2*del[del[Wbar[Index[Lorentz, mu$1]],
2825        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/
2826     (4*MW^2*sw^2) - (cWW*ee^2*GP*GPbar*del[del[Wbar[Index[Lorentz, mu$1]],
2827        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/
2828     (2*MW^2*sw^2) - (cWW*ee^2*H^2*del[del[Wbar[Index[Lorentz, mu$1]],
2829        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/
2830     (4*MW^2*sw^2) - (cWW*ee^2*H*vev*del[del[Wbar[Index[Lorentz, mu$1]],
2831        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/
2832     (2*MW^2*sw^2) - (cWW*ee^2*vev^2*del[del[Wbar[Index[Lorentz, mu$1]],
2833        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/
2834     (4*MW^2*sw^2) + (c2W*ee^2*A[Index[Lorentz, mu$1]]*
2835      A[Index[Lorentz, mu$2]]*del[del[Wbar[Index[Lorentz, mu$2]],
2836        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]])/
2837     MW^2 - ((2*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
2838      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]],
2839       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]])/MW^2 -
2840    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2841      del[del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]],
2842       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]])/MW^2 +
2843    ((2*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
2844      del[del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]],
2845       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]])/MW^2 -
2846    (cB*ee^2*G0*GPbar*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
2847       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
2848    ((I/2)*cB*ee^2*GPbar*H*del[del[Z[Index[Lorentz, mu$1]],
2849        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/
2850     (cw*MW^2) + ((I/2)*cB*ee^2*GPbar*vev*del[del[Z[Index[Lorentz, mu$1]],
2851        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/
2852     (cw*MW^2) + ((I/4)*cWW*ee^3*G0^2*A[Index[Lorentz, mu$1]]*
2853      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2854      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
2855    ((I/2)*cWW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*
2856      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2857      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
2858    ((I/4)*cWW*ee^3*H^2*A[Index[Lorentz, mu$1]]*
2859      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2860      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
2861    ((I/2)*cWW*ee^3*H*vev*A[Index[Lorentz, mu$1]]*
2862      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2863      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
2864    ((I/4)*cWW*ee^3*vev^2*A[Index[Lorentz, mu$1]]*
2865      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2866      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
2867    ((I/2)*cWW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*
2868      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2869      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
2870    ((I/2)*cWW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
2871      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2872      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
2873    (cWW*ee^2*GPbar*del[GP, Index[Lorentz, mu$1]]*
2874      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2875      W[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
2876    (cWW*ee^2*GP*del[GPbar, Index[Lorentz, mu$1]]*
2877      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2878      W[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
2879    ((I/2)*cWW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*
2880      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2881      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
2882    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2883      A[Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$2]],
2884       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]])/MW^2 -
2885    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2886      A[Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$3]],
2887       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/MW^2 -
2888    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
2889       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
2890       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]])/MW^2 +
2891    ((2*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
2892       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
2893       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]])/MW^2 +
2894    ((2*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
2895       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
2896       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]])/(MW^2*sw) -
2897    ((I/2)*cw*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
2898      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2899      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
2900    (cw*cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
2901       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
2902    (cw*cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*
2903      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2904      W[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
2905    (cw*cWW*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
2906      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2907      W[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
2908    (cw*cWW*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
2909      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2910      W[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
2911    ((I/2)*cw*cWW*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
2912      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2913      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
2914    ((I/2)*cw*cWW*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
2915      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2916      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
2917    ((I/2)*cw*cWW*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
2918      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2919      W[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
2920    ((2*I)*c2W*cw*ee*del[del[Wbar[Index[Lorentz, mu$1]],
2921        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
2922      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
2923      W[Index[Lorentz, mu$1]])/(MW^2*sw) -
2924    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
2925       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
2926       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]])/(MW^2*sw) +
2927    I*ee*ghAbar . del[ghWm, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]] -
2928    I*ee*ghWpbar . del[ghA, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]] -
2929    (I*cw*ee*ghWpbar . del[ghZ, Index[Lorentz, mu$1]]*
2930      W[Index[Lorentz, mu$1]])/sw +
2931    (I*cw*ee*ghZbar . del[ghWm, Index[Lorentz, mu$1]]*
2932      W[Index[Lorentz, mu$1]])/sw +
2933    (cT*ee^2*GPbar^2*W[Index[Lorentz, mu$1]]^2)/(2*sw^2) -
2934    (cT*ee^2*G0^2*GPbar^2*W[Index[Lorentz, mu$1]]^2)/(2*sw^2*vev^2) +
2935    (I*cT*ee^2*G0*GPbar^2*H*W[Index[Lorentz, mu$1]]^2)/(sw^2*vev^2) +
2936    (cT*ee^2*GPbar^2*H^2*W[Index[Lorentz, mu$1]]^2)/(2*sw^2*vev^2) +
2937    (I*cT*ee^2*G0*GPbar^2*W[Index[Lorentz, mu$1]]^2)/(sw^2*vev) +
2938    (cT*ee^2*GPbar^2*H*W[Index[Lorentz, mu$1]]^2)/(sw^2*vev) +
2939    (cWW*ee^4*G0*GPbar*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
2940      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
2941    ((I/2)*cWW*ee^4*GPbar*H*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
2942      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
2943    ((I/2)*cWW*ee^4*GPbar*vev*A[Index[Lorentz, mu$1]]^2*
2944      A[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2945    ((I/2)*cWW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2946      del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) -
2947    (I*cHW*ee^3*GPbar*A[Index[Lorentz, mu$1]]^2*del[G0, Index[Lorentz, mu$2]]*
2948      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
2949    ((I/2)*cWW*ee^3*GPbar*A[Index[Lorentz, mu$1]]^2*
2950      del[G0, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) -
2951    ((I/2)*cWW*ee^3*G0*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2952      del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) -
2953    (cWW*ee^3*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2954      del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
2955    (cWW*ee^3*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2956      del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
2957    (cHW*ee^2*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
2958      del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2959    ((I/2)*cWW*ee^3*G0*A[Index[Lorentz, mu$1]]^2*
2960      del[GPbar, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2961    (cWW*ee^3*H*A[Index[Lorentz, mu$1]]^2*del[GPbar, Index[Lorentz, mu$2]]*
2962      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
2963    (cWW*ee^3*vev*A[Index[Lorentz, mu$1]]^2*del[GPbar, Index[Lorentz, mu$2]]*
2964      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
2965    (cHW*ee^2*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$1]]*
2966      del[GPbar, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2967    (cWW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
2968      del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
2969    (I*cHW*ee^2*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
2970      del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) -
2971    (cHW*ee^3*GPbar*A[Index[Lorentz, mu$1]]^2*del[H, Index[Lorentz, mu$2]]*
2972      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
2973    (cWW*ee^3*GPbar*A[Index[Lorentz, mu$1]]^2*del[H, Index[Lorentz, mu$2]]*
2974      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
2975    (I*cHW*ee^2*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$1]]*
2976      del[H, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2977    ((I/2)*cHB*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
2978      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
2979      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2980    ((I/2)*cHW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
2981      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
2982      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2983    (I*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
2984       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2985    (cHB*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
2986       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
2987    (cHW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
2988       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
2989    (cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
2990       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2991    (cHB*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
2992       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
2993    (cHW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
2994       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
2995    (cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
2996       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
2997    (cHB*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
2998      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
2999      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3000    (cHW*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3001      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3002      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3003    (cWW*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3004      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3005      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3006    (cHB*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3007      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3008      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
3009    (cHW*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3010      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3011      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
3012    (cWW*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3013      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3014      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3015    ((I/2)*cHB*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3016      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3017      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3018    ((I/2)*cHW*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3019      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3020      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3021    (I*cWW*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3022      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3023      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3024    ((I/2)*cHB*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3025      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3026      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3027    ((I/2)*cHW*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3028      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3029      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3030    (I*cWW*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3031      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3032      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3033    ((I/2)*cHB*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3034      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3035      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3036    ((I/2)*cHW*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3037      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3038      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3039    (I*cWW*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3040      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3041      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3042    ((I/2)*cHB*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
3043      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3044      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3045    ((I/2)*cHW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
3046      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3047      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3048    ((I/2)*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
3049      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3050      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3051    (cHB*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3052       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3053    (cHW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3054       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3055    (cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3056       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3057    (cHB*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3058       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3059    (cHW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3060       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3061    (cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3062       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3063    (cHB*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3064      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3065      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
3066    (cHW*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3067      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3068      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
3069    (cWW*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3070      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3071      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3072    (cHB*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3073      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3074      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3075    (cHW*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3076      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3077      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
3078    (cWW*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3079      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3080      W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
3081    ((I/2)*cHB*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3082      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3083      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3084    ((I/2)*cHW*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3085      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3086      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3087    ((I/2)*cWW*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3088      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3089      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3090    ((I/2)*cHB*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3091      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3092      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3093    ((I/2)*cHW*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3094      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3095      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3096    ((I/2)*cWW*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3097      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3098      W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3099    ((I/2)*cHB*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3100      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3101      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3102    ((I/2)*cHW*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3103      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3104      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3105    ((I/2)*cWW*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3106      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3107      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3108    (cB*ee^2*G0*GPbar*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3109       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
3110    ((I/2)*cB*ee^2*GPbar*H*del[del[A[Index[Lorentz, mu$1]],
3111        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/
3112     (MW^2*sw) + ((I/2)*cB*ee^2*GPbar*vev*del[del[A[Index[Lorentz, mu$1]],
3113        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/
3114     (MW^2*sw) + (cWW*ee^2*G0^2*del[del[Wbar[Index[Lorentz, mu$1]],
3115        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/
3116     (4*MW^2*sw^2) + (cWW*ee^2*GP*GPbar*del[del[Wbar[Index[Lorentz, mu$1]],
3117        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/
3118     (2*MW^2*sw^2) + (cWW*ee^2*H^2*del[del[Wbar[Index[Lorentz, mu$1]],
3119        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/
3120     (4*MW^2*sw^2) + (cWW*ee^2*H*vev*del[del[Wbar[Index[Lorentz, mu$1]],
3121        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/
3122     (2*MW^2*sw^2) + (cWW*ee^2*vev^2*del[del[Wbar[Index[Lorentz, mu$1]],
3123        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/
3124     (4*MW^2*sw^2) + (c2W*ee^2*A[Index[Lorentz, mu$1]]*
3125      A[Index[Lorentz, mu$2]]*del[del[Wbar[Index[Lorentz, mu$1]],
3126        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/
3127     MW^2 + ((4*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3128      del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]],
3129       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/MW^2 -
3130    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]^2*del[del[Wbar[Index[Lorentz, mu$2]],
3131        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/
3132     MW^2 - ((2*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
3133      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]],
3134       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/MW^2 -
3135    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
3136      del[del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]],
3137       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/MW^2 -
3138    ((4*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3139      del[del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]],
3140       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/MW^2 +
3141    (cB*ee^2*G0*GPbar*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3142       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*cw*MW^2) -
3143    ((I/2)*cB*ee^2*GPbar*H*del[del[Z[Index[Lorentz, mu$1]],
3144        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/
3145     (cw*MW^2) - ((I/2)*cB*ee^2*GPbar*vev*del[del[Z[Index[Lorentz, mu$1]],
3146        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/
3147     (cw*MW^2) - I*ee*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
3148      Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]] +
3149    ((I/4)*cWW*ee^3*G0^2*A[Index[Lorentz, mu$1]]*
3150      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3151      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3152    (I*cHW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*
3153      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3154      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3155    (((5*I)/2)*cWW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*
3156      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3157      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3158    ((I/4)*cWW*ee^3*H^2*A[Index[Lorentz, mu$1]]*
3159      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3160      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3161    ((I/2)*cWW*ee^3*H*vev*A[Index[Lorentz, mu$1]]*
3162      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3163      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3164    (I*cA*ee^3*vev^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
3165       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/MW^2 +
3166    ((I/4)*cWW*ee^3*vev^2*A[Index[Lorentz, mu$1]]*
3167      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3168      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3169    (cHW*ee^2*G0*del[G0, Index[Lorentz, mu$1]]*
3170      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3171      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3172    ((I/2)*cHW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*
3173      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3174      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3175    (I*cWW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*
3176      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3177      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3178    ((I/2)*cHW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
3179      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3180      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3181    (I*cWW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
3182      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3183      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3184    (cHW*ee^2*GPbar*del[GP, Index[Lorentz, mu$1]]*
3185      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3186      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3187    (cWW*ee^2*GPbar*del[GP, Index[Lorentz, mu$1]]*
3188      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3189      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3190    (cWW*ee^2*GP*del[GPbar, Index[Lorentz, mu$1]]*
3191      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3192      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3193    ((I/2)*cHW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*
3194      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3195      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3196    (I*cWW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*
3197      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3198      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3199    (cHW*ee^2*H*del[H, Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
3200       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
3201    (cHW*ee^2*vev*del[H, Index[Lorentz, mu$1]]*
3202      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3203      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
3204    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3205       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$1]],
3206       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/MW^2 +
3207    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3208       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$1]],
3209       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3210    I*ee*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3211      Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]] -
3212    ((I/2)*cWW*ee^3*G0^2*A[Index[Lorentz, mu$1]]*
3213      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3214      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3215    (I*cHW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*
3216      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3217      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3218    ((2*I)*cWW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*
3219      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3220      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3221    ((I/2)*cWW*ee^3*H^2*A[Index[Lorentz, mu$1]]*
3222      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3223      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3224    (I*cWW*ee^3*H*vev*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3225       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3226    (I*cA*ee^3*vev^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3227       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/MW^2 -
3228    ((I/2)*cWW*ee^3*vev^2*A[Index[Lorentz, mu$1]]*
3229      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3230      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3231    (cHW*ee^2*G0*del[G0, Index[Lorentz, mu$1]]*
3232      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3233      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
3234    ((I/2)*cHW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*
3235      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3236      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3237    ((I/2)*cWW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*
3238      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3239      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3240    ((I/2)*cHW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
3241      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3242      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3243    ((I/2)*cWW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
3244      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3245      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3246    (cHW*ee^2*GPbar*del[GP, Index[Lorentz, mu$1]]*
3247      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3248      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3249    (cWW*ee^2*GPbar*del[GP, Index[Lorentz, mu$1]]*
3250      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3251      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
3252    (cWW*ee^2*GP*del[GPbar, Index[Lorentz, mu$1]]*
3253      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3254      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3255    ((I/2)*cHW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*
3256      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3257      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3258    ((I/2)*cWW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*
3259      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3260      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3261    (cHW*ee^2*H*del[H, Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3262       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3263    (cHW*ee^2*vev*del[H, Index[Lorentz, mu$1]]*
3264      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3265      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3266    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3267       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$3]],
3268       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/MW^2 -
3269    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3270       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$3]],
3271       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3272    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
3273       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
3274       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/MW^2 -
3275    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3276       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$3]],
3277       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/MW^2 -
3278    ((2*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3279       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$3]],
3280       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/MW^2 -
3281    ((2*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3282       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$3]],
3283       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3284    ((I/2)*cHB*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
3285      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3286      W[Index[Lorentz, mu$2]])/(cw*MW^2) -
3287    (cHB*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
3288       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(2*cw*MW^2) +
3289    ((I/2)*cHW*cw*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
3290      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3291      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3292    (I*cw*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
3293      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3294      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3295    (cHW*cw*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
3296       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3297    (cw*cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
3298       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3299    (cHB*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
3300       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]])/(2*cw*MW^2) +
3301    (cHW*cw*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*
3302      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3303      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3304    (cw*cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*
3305      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3306      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3307    (cHB*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3308      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3309      W[Index[Lorentz, mu$2]])/(2*cw*MW^2) -
3310    (cHW*cw*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3311      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3312      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
3313    (cw*cWW*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3314      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3315      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3316    (cHB*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3317      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3318      W[Index[Lorentz, mu$2]])/(2*cw*MW^2) +
3319    ((I/2)*cHB*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3320      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3321      W[Index[Lorentz, mu$2]])/(cw*MW^2) +
3322    (cHW*cw*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3323      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3324      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3325    (cw*cWW*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3326      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3327      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3328    ((I/2)*cHW*cw*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3329      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3330      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3331    (I*cw*cWW*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3332      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3333      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3334    ((I/2)*cHB*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3335      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3336      W[Index[Lorentz, mu$2]])/(cw*MW^2) -
3337    ((I/2)*cHW*cw*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3338      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3339      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3340    (I*cw*cWW*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3341      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3342      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3343    ((I/2)*cHB*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3344      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3345      W[Index[Lorentz, mu$2]])/(cw*MW^2) +
3346    ((I/2)*cHW*cw*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3347      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3348      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3349    (I*cw*cWW*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3350      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3351      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3352    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3353       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$1]],
3354       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
3355    ((I/2)*cHB*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
3356      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3357      W[Index[Lorentz, mu$2]])/(cw*MW^2) +
3358    (cHB*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
3359       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*cw*MW^2) -
3360    ((I/2)*cHW*cw*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
3361      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3362      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3363    ((I/2)*cw*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
3364      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3365      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3366    (cHW*cw*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
3367       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
3368    (cw*cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
3369       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3370    (cHB*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
3371       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(2*cw*MW^2) -
3372    (cHW*cw*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*
3373      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3374      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
3375    (cw*cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*
3376      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3377      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3378    (cHB*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3379      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3380      W[Index[Lorentz, mu$2]])/(2*cw*MW^2) +
3381    (cHW*cw*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3382      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3383      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3384    (cw*cWW*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
3385      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3386      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3387    (cHB*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3388      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3389      W[Index[Lorentz, mu$2]])/(2*cw*MW^2) -
3390    ((I/2)*cHB*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3391      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3392      W[Index[Lorentz, mu$2]])/(cw*MW^2) -
3393    (cHW*cw*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3394      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3395      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
3396    (cw*cWW*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
3397      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3398      W[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
3399    ((I/2)*cHW*cw*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3400      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3401      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3402    ((I/2)*cw*cWW*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3403      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3404      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3405    ((I/2)*cHB*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3406      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3407      W[Index[Lorentz, mu$2]])/(cw*MW^2) +
3408    ((I/2)*cHW*cw*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3409      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3410      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3411    ((I/2)*cw*cWW*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
3412      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3413      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3414    ((I/2)*cHB*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3415      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3416      W[Index[Lorentz, mu$2]])/(cw*MW^2) -
3417    ((I/2)*cHW*cw*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3418      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3419      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
3420    ((I/2)*cw*cWW*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
3421      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3422      W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3423    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3424       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$3]],
3425       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
3426    ((2*I)*c2W*cw*ee*del[del[Wbar[Index[Lorentz, mu$1]],
3427        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3428      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
3429      W[Index[Lorentz, mu$2]])/(MW^2*sw) -
3430    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
3431       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
3432       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3433    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3434       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
3435       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]])/(MW^2*sw) +
3436    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3437       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$4]],
3438       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
3439       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]])/
3440     (MW^2*sw^2) - (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3441      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3442      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
3443      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
3444       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
3445    (c2W*ee^2*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3446      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
3447      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
3448    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]^2*del[del[Wbar[Index[Lorentz, mu$2]],
3449        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/
3450     MW^2 + ((2*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
3451      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]],
3452       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/MW^2 -
3453    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
3454      A[Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$1]],
3455       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/MW^2 +
3456    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3457       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$1]],
3458       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/MW^2 -
3459    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3460       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$1]],
3461       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
3462    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
3463      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
3464      W[Index[Lorentz, mu$3]])/MW^2 - (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*
3465      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3466      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
3467      W[Index[Lorentz, mu$3]])/MW^2 -
3468    ((4*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3469       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$1]],
3470       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/MW^2 -
3471    ((4*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3472       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$1]],
3473       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) +
3474    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
3475      A[Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$2]],
3476       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]])/MW^2 -
3477    (8*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3478       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$2]],
3479       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]])/MW^2 +
3480    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3481       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$2]],
3482       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
3483    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
3484      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3485      W[Index[Lorentz, mu$3]])/MW^2 + (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*
3486      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3487      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3488      W[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
3489    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3490       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3491       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
3492    ((4*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3493       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3494       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/MW^2 +
3495    ((4*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3496       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3497       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) -
3498    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
3499      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
3500      W[Index[Lorentz, mu$3]])/MW^2 + (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*
3501      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3502      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
3503      W[Index[Lorentz, mu$3]])/MW^2 +
3504    ((2*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3505       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
3506       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]])/MW^2 +
3507    ((2*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3508       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
3509       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) -
3510    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
3511      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
3512      W[Index[Lorentz, mu$3]])/MW^2 - (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*
3513      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3514      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
3515      W[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
3516    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3517       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$3]],
3518       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
3519    ((2*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3520       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$3]],
3521       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/MW^2 -
3522    ((2*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3523       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$3]],
3524       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) +
3525    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3526       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$1]],
3527       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
3528    ((4*I)*c2W*cw*ee*del[del[Wbar[Index[Lorentz, mu$1]],
3529        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3530      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
3531      W[Index[Lorentz, mu$3]])/(MW^2*sw) +
3532    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3533       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$1]],
3534       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) -
3535    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3536       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$2]],
3537       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
3538    ((4*I)*c2W*cw*ee*del[del[Wbar[Index[Lorentz, mu$1]],
3539        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3540      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3541      W[Index[Lorentz, mu$3]])/(MW^2*sw) -
3542    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
3543       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
3544       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
3545    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
3546       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
3547       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) +
3548    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3549       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
3550       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
3551    (8*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3552       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
3553       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) -
3554    ((2*I)*c2W*cw*ee*del[del[Wbar[Index[Lorentz, mu$1]],
3555        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3556      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
3557      W[Index[Lorentz, mu$3]])/(MW^2*sw) -
3558    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3559       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
3560       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) +
3561    ((2*I)*c2W*cw*ee*del[del[Wbar[Index[Lorentz, mu$1]],
3562        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
3563      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
3564      W[Index[Lorentz, mu$3]])/(MW^2*sw) +
3565    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
3566       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
3567       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
3568    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
3569       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
3570       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) -
3571    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3572       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
3573       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
3574    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3575       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
3576       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw) -
3577    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3578       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$4]],
3579       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3580       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]])/
3581     (MW^2*sw^2) + (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3582      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3583      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
3584      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
3585       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
3586    (2*c2W*ee^2*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3587      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3588      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
3589    (c2W*ee^2*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3590      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
3591      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
3592    (4*c2W*ee^2*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3593      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
3594      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
3595    (c2W*ee^2*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
3596      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3597      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
3598    (2*c2W*ee^2*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3599      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
3600      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
3601    (c2W*ee^2*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
3602      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3603      W[Index[Lorentz, mu$3]]^2)/(MW^2*sw^2) +
3604    (I*ee^3*GPbar*tcHW*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
3605      del[G0, Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1],
3606       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
3607      W[Index[Lorentz, mu$4]])/(MW^2*sw) +
3608    (ee^2*tcHW*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
3609      del[GPbar, Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1],
3610       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
3611      W[Index[Lorentz, mu$4]])/(MW^2*sw) +
3612    (ee^3*GPbar*tcHW*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
3613      del[H, Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1],
3614       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
3615      W[Index[Lorentz, mu$4]])/(MW^2*sw) +
3616    (I*ee^2*tcHW*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
3617      del[H, Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1],
3618       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
3619      W[Index[Lorentz, mu$4]])/(MW^2*sw) +
3620    ((I/2)*ee^3*G0*GPbar*tcHB*A[Index[Lorentz, mu$1]]*
3621      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3622      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3623       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw) +
3624    (ee^3*GPbar*H*tcHB*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3625       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3626       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/
3627     (2*MW^2*sw) + ((I/2)*ee^3*G0*GPbar*tcHW*A[Index[Lorentz, mu$1]]*
3628      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3629      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3630       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw) +
3631    (ee^3*GPbar*H*tcHW*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3632       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3633       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/
3634     (2*MW^2*sw) + (ee^3*GPbar*tcHB*vev*A[Index[Lorentz, mu$1]]*
3635      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3636      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3637       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw) +
3638    (ee^3*GPbar*tcHW*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3639       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3640       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/
3641     (2*MW^2*sw) + (ee^2*GPbar*tcHB*del[G0, Index[Lorentz, mu$1]]*
3642      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3643      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3644       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw) -
3645    (ee^2*GPbar*tcHW*del[G0, Index[Lorentz, mu$1]]*
3646      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3647      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3648       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw) +
3649    (ee^2*G0*tcHB*del[GPbar, Index[Lorentz, mu$1]]*
3650      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3651      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3652       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw) -
3653    ((I/2)*ee^2*H*tcHB*del[GPbar, Index[Lorentz, mu$1]]*
3654      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3655      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3656       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw) +
3657    (ee^2*G0*tcHW*del[GPbar, Index[Lorentz, mu$1]]*
3658      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3659      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3660       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw) -
3661    ((I/2)*ee^2*H*tcHW*del[GPbar, Index[Lorentz, mu$1]]*
3662      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3663      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3664       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw) -
3665    ((I/2)*ee^2*tcHB*vev*del[GPbar, Index[Lorentz, mu$1]]*
3666      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3667      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3668       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw) -
3669    ((I/2)*ee^2*tcHW*vev*del[GPbar, Index[Lorentz, mu$1]]*
3670      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3671      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3672       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw) -
3673    ((I/2)*ee^2*GPbar*tcHB*del[H, Index[Lorentz, mu$1]]*
3674      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3675      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3676       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw) +
3677    ((I/2)*ee^2*GPbar*tcHW*del[H, Index[Lorentz, mu$1]]*
3678      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3679      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3680       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw) +
3681    (I*ee^3*GP*GPbar*tcHW*A[Index[Lorentz, mu$1]]*
3682      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3683      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3684       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
3685    (ee^2*G0*tcHW*del[G0, Index[Lorentz, mu$1]]*
3686      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3687      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3688       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) +
3689    ((I/2)*ee^2*H*tcHW*del[G0, Index[Lorentz, mu$1]]*
3690      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3691      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3692       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
3693    ((I/2)*ee^2*tcHW*vev*del[G0, Index[Lorentz, mu$1]]*
3694      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3695      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3696       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
3697    (ee^2*GPbar*tcHW*del[GP, Index[Lorentz, mu$1]]*
3698      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3699      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3700       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
3701    ((I/2)*ee^2*G0*tcHW*del[H, Index[Lorentz, mu$1]]*
3702      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3703      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3704       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
3705    (ee^2*H*tcHW*del[H, Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3706       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3707       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/
3708     (2*MW^2*sw^2) - (ee^2*tcHW*vev*del[H, Index[Lorentz, mu$1]]*
3709      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3710      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3711       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
3712    ((I/2)*ee^3*G0*GPbar*tcHB*A[Index[Lorentz, mu$1]]*
3713      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3714      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3715       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(cw*MW^2) -
3716    (ee^3*GPbar*H*tcHB*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
3717       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3718       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/
3719     (2*cw*MW^2) + ((I/2)*cw*ee^3*G0*GPbar*tcHW*A[Index[Lorentz, mu$1]]*
3720      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3721      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3722       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
3723    (cw*ee^3*GPbar*H*tcHW*A[Index[Lorentz, mu$1]]*
3724      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3725      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3726       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
3727    (ee^3*GPbar*tcHB*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
3728       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3729       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/
3730     (2*cw*MW^2) + (cw*ee^3*GPbar*tcHW*vev*A[Index[Lorentz, mu$1]]*
3731      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3732      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3733       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
3734    (ee^2*GPbar*tcHB*del[G0, Index[Lorentz, mu$1]]*
3735      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3736      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3737       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*cw*MW^2) -
3738    (cw*ee^2*GPbar*tcHW*del[G0, Index[Lorentz, mu$1]]*
3739      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3740      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3741       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
3742    (ee^2*G0*tcHB*del[GPbar, Index[Lorentz, mu$1]]*
3743      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3744      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3745       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*cw*MW^2) +
3746    ((I/2)*ee^2*H*tcHB*del[GPbar, Index[Lorentz, mu$1]]*
3747      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3748      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3749       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(cw*MW^2) +
3750    (cw*ee^2*G0*tcHW*del[GPbar, Index[Lorentz, mu$1]]*
3751      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3752      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3753       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
3754    ((I/2)*cw*ee^2*H*tcHW*del[GPbar, Index[Lorentz, mu$1]]*
3755      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3756      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3757       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
3758    ((I/2)*ee^2*tcHB*vev*del[GPbar, Index[Lorentz, mu$1]]*
3759      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3760      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3761       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(cw*MW^2) -
3762    ((I/2)*cw*ee^2*tcHW*vev*del[GPbar, Index[Lorentz, mu$1]]*
3763      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3764      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3765       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
3766    ((I/2)*ee^2*GPbar*tcHB*del[H, Index[Lorentz, mu$1]]*
3767      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3768      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3769       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(cw*MW^2) +
3770    ((I/2)*cw*ee^2*GPbar*tcHW*del[H, Index[Lorentz, mu$1]]*
3771      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3772      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3773       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
3774    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3775       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$4]],
3776       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3777       Index[Lorentz, mu$3], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]])/
3778     (MW^2*sw^2) + (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3779      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3780      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
3781      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3782       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
3783    ((I/2)*ee^3*G0*GPbar*tcHW*del[Wbar[Index[Lorentz, mu$1]],
3784       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3785       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
3786      W[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
3787    (ee^3*GPbar*H*tcHW*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3788      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3789       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$4]])/
3790     (2*MW^2*sw^3) + (ee^3*GPbar*tcHW*vev*del[Wbar[Index[Lorentz, mu$1]],
3791       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3792       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
3793      W[Index[Lorentz, mu$4]])/(2*MW^2*sw^3) +
3794    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3795       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$4]],
3796       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3797       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$5]])/
3798     (MW^2*sw^2) - (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3799      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3800      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$5]]*
3801      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3802       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
3803    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3804       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$3]],
3805       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3806       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/
3807     (MW^2*sw^2) - (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3808      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3809      del[Wbar[Index[Lorentz, mu$4]], Index[Lorentz, mu$3]]*
3810      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
3811       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
3812    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3813       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$3]],
3814       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
3815       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/
3816     (MW^2*sw^3) + (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3817      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3818      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$3]]*
3819      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
3820       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
3821    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3822       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$2]],
3823       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
3824       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/
3825     (MW^2*sw^2) + (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3826      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3827      del[Wbar[Index[Lorentz, mu$4]], Index[Lorentz, mu$2]]*
3828      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
3829       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
3830    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3831       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$2]],
3832       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
3833       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/
3834     (MW^2*sw^3) - (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3835      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3836      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$2]]*
3837      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
3838       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
3839    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3840       Index[Lorentz, mu$3]]*del[Wbar[Index[Lorentz, mu$1]],
3841       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3842       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/
3843     (MW^2*sw^2) + (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3844      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3845      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
3846      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
3847       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
3848    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3849       Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$3]],
3850       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3851       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/
3852     (MW^2*sw^2) + (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3853      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3854      del[Wbar[Index[Lorentz, mu$4]], Index[Lorentz, mu$1]]*
3855      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
3856       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
3857    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3858       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$1]],
3859       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3860       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/
3861     (MW^2*sw^3) - (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3862      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3863      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
3864      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
3865       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
3866    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
3867       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
3868       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
3869       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/
3870     (MW^2*sw^3) - (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*
3871      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
3872      del[Z[Index[Lorentz, mu$4]], Index[Lorentz, mu$1]]*
3873      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
3874       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
3875    (ee^2*G0*GP*A[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/(2*sw) -
3876    ((I/2)*ee^2*GP*H*A[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/sw +
3877    ((I/4)*cH*ee^2*GP*H*A[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3878     sw + (2*cT*ee^2*G0*GP^2*GPbar*A[Index[Lorentz, mu$1]]*
3879      Wbar[Index[Lorentz, mu$1]])/(sw*vev^2) +
3880    ((2*I)*cT*ee^2*GP^2*GPbar*H*A[Index[Lorentz, mu$1]]*
3881      Wbar[Index[Lorentz, mu$1]])/(sw*vev^2) +
3882    ((2*I)*cT*ee^2*GP^2*GPbar*A[Index[Lorentz, mu$1]]*
3883      Wbar[Index[Lorentz, mu$1]])/(sw*vev) -
3884    ((I/2)*ee^2*GP*vev*A[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3885     sw - (cA*ee^4*G0*GP*vev^2*A[Index[Lorentz, mu$1]]*
3886      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
3887    ((I/2)*cA*ee^4*GP*H*vev^2*A[Index[Lorentz, mu$1]]*
3888      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
3889    ((I/2)*cA*ee^4*GP*vev^3*A[Index[Lorentz, mu$1]]*
3890      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
3891    (cWW*ee^4*G0*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
3892      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
3893    ((I/2)*cWW*ee^4*GP*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
3894      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
3895    ((I/2)*cWW*ee^4*GP*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
3896      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) +
3897    ((I/2)*ee*GP*del[G0, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3898     sw - (I*cT*ee*GP*del[G0, Index[Lorentz, mu$1]]*
3899      Wbar[Index[Lorentz, mu$1]])/sw -
3900    (cT*ee*G0*GP*H*del[G0, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3901     (sw*vev^2) - (I*cT*ee*GP*H^2*del[G0, Index[Lorentz, mu$1]]*
3902      Wbar[Index[Lorentz, mu$1]])/(sw*vev^2) -
3903    (cT*ee*G0*GP*del[G0, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3904     (sw*vev) - ((2*I)*cT*ee*GP*H*del[G0, Index[Lorentz, mu$1]]*
3905      Wbar[Index[Lorentz, mu$1]])/(sw*vev) -
3906    ((I/2)*ee*G0*del[GP, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3907     sw + (ee*H*del[GP, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3908     (2*sw) - (cH*ee*H*del[GP, Index[Lorentz, mu$1]]*
3909      Wbar[Index[Lorentz, mu$1]])/(4*sw) +
3910    (I*cT*ee*G0*GP*GPbar*del[GP, Index[Lorentz, mu$1]]*
3911      Wbar[Index[Lorentz, mu$1]])/(sw*vev^2) -
3912    (cT*ee*GP*GPbar*H*del[GP, Index[Lorentz, mu$1]]*
3913      Wbar[Index[Lorentz, mu$1]])/(sw*vev^2) -
3914    (cT*ee*GP*GPbar*del[GP, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3915     (sw*vev) + (ee*vev*del[GP, Index[Lorentz, mu$1]]*
3916      Wbar[Index[Lorentz, mu$1]])/(2*sw) -
3917    (I*cT*ee*G0*GP^2*del[GPbar, Index[Lorentz, mu$1]]*
3918      Wbar[Index[Lorentz, mu$1]])/(sw*vev^2) +
3919    (cT*ee*GP^2*H*del[GPbar, Index[Lorentz, mu$1]]*
3920      Wbar[Index[Lorentz, mu$1]])/(sw*vev^2) +
3921    (cT*ee*GP^2*del[GPbar, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3922     (sw*vev) - (ee*GP*del[H, Index[Lorentz, mu$1]]*
3923      Wbar[Index[Lorentz, mu$1]])/(2*sw) +
3924    (cH*ee*GP*del[H, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3925     (4*sw) + (cT*ee*G0^2*GP*del[H, Index[Lorentz, mu$1]]*
3926      Wbar[Index[Lorentz, mu$1]])/(sw*vev^2) +
3927    (I*cT*ee*G0*GP*H*del[H, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
3928     (sw*vev^2) + (I*cT*ee*G0*GP*del[H, Index[Lorentz, mu$1]]*
3929      Wbar[Index[Lorentz, mu$1]])/(sw*vev) +
3930    ((I/2)*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
3931      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3932      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
3933    (cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3934       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
3935    (cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3936       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw) +
3937    (cWW*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3938       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
3939    (cWW*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
3940       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
3941    ((I/2)*cWW*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
3942      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3943      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
3944    ((I/2)*cWW*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
3945      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3946      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) +
3947    ((I/2)*cWW*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
3948      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3949      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) +
3950    (cB*ee^2*G0*GP*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3951       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw) +
3952    ((I/2)*cB*ee^2*GP*H*del[del[A[Index[Lorentz, mu$1]],
3953        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3954      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) +
3955    ((I/2)*cB*ee^2*GP*vev*del[del[A[Index[Lorentz, mu$1]],
3956        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3957      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
3958    (cWW*ee^2*G0^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3959       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(4*MW^2*sw^2) -
3960    (cWW*ee^2*GP*GPbar*del[del[W[Index[Lorentz, mu$1]],
3961        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3962      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
3963    (cWW*ee^2*H^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3964       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(4*MW^2*sw^2) -
3965    (cWW*ee^2*H*vev*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3966       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
3967    (cWW*ee^2*vev^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3968       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(4*MW^2*sw^2) +
3969    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
3970      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]],
3971       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 +
3972    ((2*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3973      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]],
3974       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
3975    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
3976      del[del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]],
3977       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
3978    ((2*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
3979      del[del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]],
3980       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
3981    (cB*ee^2*G0*GP*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
3982       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
3983    ((I/2)*cB*ee^2*GP*H*del[del[Z[Index[Lorentz, mu$1]],
3984        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3985      Wbar[Index[Lorentz, mu$1]])/(cw*MW^2) -
3986    ((I/2)*cB*ee^2*GP*vev*del[del[Z[Index[Lorentz, mu$1]],
3987        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3988      Wbar[Index[Lorentz, mu$1]])/(cw*MW^2) -
3989    ((I/4)*cWW*ee^3*G0^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
3990       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
3991    ((I/2)*cWW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*
3992      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3993      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
3994    ((I/4)*cWW*ee^3*H^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
3995       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
3996    ((I/2)*cWW*ee^3*H*vev*A[Index[Lorentz, mu$1]]*
3997      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
3998      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
3999    ((I/4)*cWW*ee^3*vev^2*A[Index[Lorentz, mu$1]]*
4000      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4001      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4002    ((I/2)*cWW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*
4003      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4004      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4005    ((I/2)*cWW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
4006      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4007      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4008    (cWW*ee^2*GPbar*del[GP, Index[Lorentz, mu$1]]*
4009      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4010      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
4011    (cWW*ee^2*GP*del[GPbar, Index[Lorentz, mu$1]]*
4012      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4013      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
4014    ((I/2)*cWW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*
4015      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4016      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4017    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4018      A[Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$2]],
4019       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 +
4020    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4021      A[Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$3]],
4022       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
4023    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4024       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
4025       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
4026    ((2*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4027       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
4028       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
4029    ((2*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4030       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
4031       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) +
4032    ((I/2)*cw*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4033      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4034      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4035    (cw*cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4036       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
4037    (cw*cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4038       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
4039    (cw*cWW*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*
4040      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4041      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
4042    (cw*cWW*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*
4043      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4044      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
4045    ((I/2)*cw*cWW*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4046      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4047      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4048    ((I/2)*cw*cWW*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4049      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4050      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4051    ((I/2)*cw*cWW*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4052      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
4053      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4054    ((2*I)*c2W*cw*ee*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4055       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
4056       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
4057    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4058       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
4059       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
4060    I*ee*ghAbar . del[ghWp, Index[Lorentz, mu$1]]*
4061     Wbar[Index[Lorentz, mu$1]] +
4062    I*ee*ghWmbar . del[ghA, Index[Lorentz, mu$1]]*
4063     Wbar[Index[Lorentz, mu$1]] +
4064    (I*cw*ee*ghWmbar . del[ghZ, Index[Lorentz, mu$1]]*
4065      Wbar[Index[Lorentz, mu$1]])/sw -
4066    (I*cw*ee*ghZbar . del[ghWp, Index[Lorentz, mu$1]]*
4067      Wbar[Index[Lorentz, mu$1]])/sw + (ee^2*G0^2*W[Index[Lorentz, mu$1]]*
4068      Wbar[Index[Lorentz, mu$1]])/(4*sw^2) +
4069    (ee^2*GP*GPbar*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
4070     (2*sw^2) - (cT*ee^2*GP*GPbar*W[Index[Lorentz, mu$1]]*
4071      Wbar[Index[Lorentz, mu$1]])/sw^2 +
4072    (ee^2*H^2*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/(4*sw^2) -
4073    (cH*ee^2*H^2*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
4074     (4*sw^2) - (cT*ee^2*G0^2*GP*GPbar*W[Index[Lorentz, mu$1]]*
4075      Wbar[Index[Lorentz, mu$1]])/(sw^2*vev^2) -
4076    (cT*ee^2*GP*GPbar*H^2*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
4077     (sw^2*vev^2) - (2*cT*ee^2*GP*GPbar*H*W[Index[Lorentz, mu$1]]*
4078      Wbar[Index[Lorentz, mu$1]])/(sw^2*vev) +
4079    (ee^2*H*vev*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
4080     (2*sw^2) - (cH*ee^2*H*vev*W[Index[Lorentz, mu$1]]*
4081      Wbar[Index[Lorentz, mu$1]])/(4*sw^2) +
4082    (ee^2*vev^2*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$1]])/
4083     (4*sw^2) + (ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4084      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/2 -
4085    (cWW*ee^4*G0^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4086      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(4*MW^2*sw^2) -
4087    (cHW*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4088      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4089    (3*cWW*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4090      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
4091    (cWW*ee^4*H^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4092      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(4*MW^2*sw^2) -
4093    (cWW*ee^4*H*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4094      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
4095    (cA*ee^4*vev^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4096      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
4097    (cWW*ee^4*vev^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4098      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(4*MW^2*sw^2) -
4099    (c2W*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4100      A[Index[Lorentz, mu$3]]^2*W[Index[Lorentz, mu$2]]*
4101      Wbar[Index[Lorentz, mu$1]])/MW^2 +
4102    ((I/2)*cHW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4103      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4104    (cHW*ee^3*H*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4105      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
4106    (cWW*ee^3*H*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4107      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
4108    (cHW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4109      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
4110    (cWW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4111      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
4112    (cHW*ee^2*del[G0, Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4113      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
4114    (I*cHW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
4115      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4116    ((I/2)*cWW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*
4117      del[GP, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4118      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4119    ((I/2)*cWW*ee^3*GP*A[Index[Lorentz, mu$1]]*
4120      del[GPbar, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4121      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4122    (cHW*ee^2*del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
4123      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4124    (cHW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4125      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
4126    (cWW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4127      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
4128    ((I/2)*cHW*ee^3*H*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4129      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4130    ((I/2)*cHW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4131      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4132    (I*cHW*ee^2*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4133      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4134    (cHW*ee^2*del[H, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4135      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
4136    I*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4137     W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]] -
4138    ((I/4)*cHB*ee^3*G0^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4139      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4140    ((I/4)*cHW*ee^3*G0^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4141      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4142    (((3*I)/4)*cWW*ee^3*G0^2*del[A[Index[Lorentz, mu$1]],
4143       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4144      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4145    ((I/2)*cHB*ee^3*GP*GPbar*del[A[Index[Lorentz, mu$1]],
4146       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4147      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4148    ((I/2)*cHW*ee^3*GP*GPbar*del[A[Index[Lorentz, mu$1]],
4149       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4150      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4151    (((3*I)/2)*cWW*ee^3*GP*GPbar*del[A[Index[Lorentz, mu$1]],
4152       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4153      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4154    ((I/4)*cHB*ee^3*H^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4155      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4156    ((I/4)*cHW*ee^3*H^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4157      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4158    (((3*I)/4)*cWW*ee^3*H^2*del[A[Index[Lorentz, mu$1]],
4159       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4160      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4161    ((I/2)*cHB*ee^3*H*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4162      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4163    ((I/2)*cHW*ee^3*H*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4164      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4165    (((3*I)/2)*cWW*ee^3*H*vev*del[A[Index[Lorentz, mu$1]],
4166       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4167      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4168    (I*cA*ee^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4169      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
4170    ((I/4)*cHB*ee^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4171      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4172    ((I/4)*cHW*ee^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4173      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4174    (((3*I)/4)*cWW*ee^3*vev^2*del[A[Index[Lorentz, mu$1]],
4175       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4176      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4177    (c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4178      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
4179      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/MW^2 +
4180    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$2]],
4181        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
4182      Wbar[Index[Lorentz, mu$1]])/MW^2 +
4183    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$2]],
4184        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
4185      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) +
4186    (2*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4187      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
4188      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4189    ((I/4)*cHW*cw*ee^3*G0^2*del[Z[Index[Lorentz, mu$1]],
4190       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4191      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4192    (((3*I)/4)*cw*cWW*ee^3*G0^2*del[Z[Index[Lorentz, mu$1]],
4193       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4194      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4195    ((I/2)*cHW*cw*ee^3*GP*GPbar*del[Z[Index[Lorentz, mu$1]],
4196       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4197      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4198    (((3*I)/2)*cw*cWW*ee^3*GP*GPbar*del[Z[Index[Lorentz, mu$1]],
4199       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4200      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4201    ((I/4)*cHW*cw*ee^3*H^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4202      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4203    (((3*I)/4)*cw*cWW*ee^3*H^2*del[Z[Index[Lorentz, mu$1]],
4204       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4205      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
4206    (I*cw*ee*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4207      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/sw +
4208    ((I/4)*cHB*ee^3*G0^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4209      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
4210    ((I/2)*cHB*ee^3*GP*GPbar*del[Z[Index[Lorentz, mu$1]],
4211       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4212      Wbar[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
4213    ((I/4)*cHB*ee^3*H^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4214      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
4215    ((I/2)*cHW*cw*ee^3*H*vev*del[Z[Index[Lorentz, mu$1]],
4216       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4217      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4218    (((3*I)/2)*cw*cWW*ee^3*H*vev*del[Z[Index[Lorentz, mu$1]],
4219       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4220      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
4221    ((I/2)*cHB*ee^3*H*vev*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4222      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
4223    ((I/4)*cHW*cw*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]],
4224       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4225      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4226    (((3*I)/4)*cw*cWW*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]],
4227       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4228      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
4229    (I*cA*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4230      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
4231    ((I/4)*cHB*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4232      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
4233    (I*cA*cw*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4234      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
4235    ((2*I)*cA*ee^3*sw*vev^2*del[Z[Index[Lorentz, mu$1]],
4236       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
4237      Wbar[Index[Lorentz, mu$1]])/(cw*MW^2) -
4238    (2*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4239      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
4240      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
4241    (c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4242      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
4243      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4244    (cHW*ee^4*G0*GPbar*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4245      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) +
4246    (cWW*ee^4*G0*GPbar*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4247      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) -
4248    ((I/2)*cHW*ee^4*GPbar*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4249      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4250    ((I/2)*cWW*ee^4*GPbar*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4251      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4252    ((I/2)*cHW*ee^4*GPbar*vev*A[Index[Lorentz, mu$1]]*
4253      W[Index[Lorentz, mu$2]]^2*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4254    ((I/2)*cWW*ee^4*GPbar*vev*A[Index[Lorentz, mu$1]]*
4255      W[Index[Lorentz, mu$2]]^2*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
4256    ((I/2)*cHW*ee^3*GPbar*del[G0, Index[Lorentz, mu$1]]*
4257      W[Index[Lorentz, mu$2]]^2*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
4258    ((I/2)*cWW*ee^3*GPbar*del[G0, Index[Lorentz, mu$1]]*
4259      W[Index[Lorentz, mu$2]]^2*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4260    ((I/2)*cHW*ee^3*G0*del[GPbar, Index[Lorentz, mu$1]]*
4261      W[Index[Lorentz, mu$2]]^2*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4262    ((I/2)*cWW*ee^3*G0*del[GPbar, Index[Lorentz, mu$1]]*
4263      W[Index[Lorentz, mu$2]]^2*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4264    (cHW*ee^3*H*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4265      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) -
4266    (cWW*ee^3*H*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4267      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) -
4268    (cHW*ee^3*vev*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4269      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) -
4270    (cWW*ee^3*vev*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4271      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) +
4272    (cHW*ee^3*GPbar*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4273      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) +
4274    (cWW*ee^3*GPbar*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
4275      Wbar[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) +
4276    (c2W*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
4277      A[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
4278      Wbar[Index[Lorentz, mu$1]])/MW^2 +
4279    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4280      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
4281      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
4282    ((3*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4283      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
4284      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4285    (2*c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4286      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
4287      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
4288    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4289      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
4290      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 +
4291    ((3*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4292      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
4293      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4294    (c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4295      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
4296      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/MW^2 -
4297    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$2]],
4298        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
4299      Wbar[Index[Lorentz, mu$1]])/MW^2 -
4300    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$2]],
4301        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
4302      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) +
4303    (6*c3W*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4304      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
4305      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^4) -
4306    (4*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4307      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
4308      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4309    (6*c3W*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4310      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
4311      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^4) +
4312    (2*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4313      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
4314      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4315    ((3*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4316      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
4317      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
4318    ((2*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4319      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
4320      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
4321    (4*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4322      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
4323      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) -
4324    (2*c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4325      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
4326      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4327    ((3*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4328      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
4329      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
4330    (I*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4331      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
4332      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) +
4333    (2*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4334      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
4335      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw) +
4336    (c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4337      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
4338      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4339    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
4340       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
4341      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4342    (2*c2W*ee^2*del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4343       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]^2*
4344      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
4345    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4346      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
4347      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
4348       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
4349      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
4350    (2*ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4351      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
4352      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
4353       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
4354      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^4) -
4355    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4356      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
4357      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
4358       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
4359      Wbar[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
4360    (cT*ee^2*GP^2*Wbar[Index[Lorentz, mu$1]]^2)/(2*sw^2) -
4361    (cT*ee^2*G0^2*GP^2*Wbar[Index[Lorentz, mu$1]]^2)/(2*sw^2*vev^2) -
4362    (I*cT*ee^2*G0*GP^2*H*Wbar[Index[Lorentz, mu$1]]^2)/(sw^2*vev^2) +
4363    (cT*ee^2*GP^2*H^2*Wbar[Index[Lorentz, mu$1]]^2)/(2*sw^2*vev^2) -
4364    (I*cT*ee^2*G0*GP^2*Wbar[Index[Lorentz, mu$1]]^2)/(sw^2*vev) +
4365    (cT*ee^2*GP^2*H*Wbar[Index[Lorentz, mu$1]]^2)/(sw^2*vev) +
4366    (cWW*ee^4*G0*GP*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
4367      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4368    ((I/2)*cWW*ee^4*GP*H*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
4369      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4370    ((I/2)*cWW*ee^4*GP*vev*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
4371      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4372    (I*cHW*ee^3*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4373      del[G0, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4374    ((I/2)*cWW*ee^3*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4375      del[G0, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4376    (I*cHW*ee^3*GP*A[Index[Lorentz, mu$1]]^2*del[G0, Index[Lorentz, mu$2]]*
4377      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4378    ((I/2)*cWW*ee^3*GP*A[Index[Lorentz, mu$1]]^2*
4379      del[G0, Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4380    ((I/2)*cWW*ee^3*G0*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4381      del[GP, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4382    (cWW*ee^3*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4383      del[GP, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4384    (cWW*ee^3*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4385      del[GP, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4386    (cHW*ee^2*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4387      del[GP, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4388    ((I/2)*cWW*ee^3*G0*A[Index[Lorentz, mu$1]]^2*
4389      del[GP, Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4390    (cWW*ee^3*H*A[Index[Lorentz, mu$1]]^2*del[GP, Index[Lorentz, mu$2]]*
4391      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4392    (cWW*ee^3*vev*A[Index[Lorentz, mu$1]]^2*del[GP, Index[Lorentz, mu$2]]*
4393      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4394    (cHW*ee^2*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$1]]*
4395      del[GP, Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4396    (cHW*ee^3*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4397      del[H, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4398    (cWW*ee^3*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4399      del[H, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4400    (I*cHW*ee^2*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
4401      del[H, Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4402    (cHW*ee^3*GP*A[Index[Lorentz, mu$1]]^2*del[H, Index[Lorentz, mu$2]]*
4403      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4404    (cWW*ee^3*GP*A[Index[Lorentz, mu$1]]^2*del[H, Index[Lorentz, mu$2]]*
4405      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4406    (I*cHW*ee^2*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$1]]*
4407      del[H, Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4408    ((I/2)*cHB*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4409      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4410      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4411    ((I/2)*cHW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4412      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4413      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4414    (I*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4415       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4416    (cHB*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4417       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4418    (cHW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4419       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4420    (cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4421       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4422    (cHB*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4423       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4424    (cHW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4425       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4426    (cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4427       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4428    (cHB*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4429       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4430    (cHW*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4431       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4432    (cWW*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4433       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4434    (cHB*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4435       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4436    (cHW*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4437       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4438    (cWW*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4439       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4440    ((I/2)*cHB*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4441      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4442      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4443    ((I/2)*cHW*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4444      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4445      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4446    (I*cWW*ee^2*H*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4447       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4448    ((I/2)*cHB*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4449      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4450      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4451    ((I/2)*cHW*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4452      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4453      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4454    (I*cWW*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4455      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4456      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4457    ((I/2)*cHB*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4458      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4459      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4460    ((I/2)*cHW*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4461      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4462      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4463    (I*cWW*ee^2*GP*del[H, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4464       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4465    ((I/2)*cHB*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4466      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4467      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4468    ((I/2)*cHW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4469      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4470      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4471    ((I/2)*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4472      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4473      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4474    (cHB*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4475       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4476    (cHW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4477       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4478    (cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4479       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4480    (cHB*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4481       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4482    (cHW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4483       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4484    (cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4485       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4486    (cHB*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4487       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4488    (cHW*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4489       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) +
4490    (cWW*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4491       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4492    (cHB*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4493       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4494    (cHW*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4495       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4496    (cWW*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4497       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4498    ((I/2)*cHB*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4499      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4500      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4501    ((I/2)*cHW*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4502      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4503      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4504    ((I/2)*cWW*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4505      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4506      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4507    ((I/2)*cHB*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4508      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4509      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4510    ((I/2)*cHW*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4511      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4512      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4513    ((I/2)*cWW*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4514      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4515      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4516    ((I/2)*cHB*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4517      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4518      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4519    ((I/2)*cHW*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4520      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4521      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4522    ((I/2)*cWW*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4523      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4524      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4525    (cB*ee^2*G0*GP*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4526       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw) -
4527    ((I/2)*cB*ee^2*GP*H*del[del[A[Index[Lorentz, mu$1]],
4528        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4529      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4530    ((I/2)*cB*ee^2*GP*vev*del[del[A[Index[Lorentz, mu$1]],
4531        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4532      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4533    (cWW*ee^2*G0^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4534       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(4*MW^2*sw^2) +
4535    (cWW*ee^2*GP*GPbar*del[del[W[Index[Lorentz, mu$1]],
4536        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4537      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4538    (cWW*ee^2*H^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4539       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(4*MW^2*sw^2) +
4540    (cWW*ee^2*H*vev*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4541       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4542    (cWW*ee^2*vev^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4543       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(4*MW^2*sw^2) +
4544    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4545      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]],
4546       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
4547    ((4*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4548      del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]],
4549       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
4550    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]^2*del[del[W[Index[Lorentz, mu$2]],
4551        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
4552      Wbar[Index[Lorentz, mu$2]])/MW^2 +
4553    ((2*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
4554      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]],
4555       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
4556    (c2W*ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4557      del[del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]],
4558       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 +
4559    ((4*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4560      del[del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]],
4561       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 +
4562    (cB*ee^2*G0*GP*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4563       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*cw*MW^2) +
4564    ((I/2)*cB*ee^2*GP*H*del[del[Z[Index[Lorentz, mu$1]],
4565        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4566      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) +
4567    ((I/2)*cB*ee^2*GP*vev*del[del[Z[Index[Lorentz, mu$1]],
4568        Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4569      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) + I*ee*A[Index[Lorentz, mu$1]]*
4570     del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4571     Wbar[Index[Lorentz, mu$2]] -
4572    ((I/4)*cWW*ee^3*G0^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4573       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4574    (I*cHW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4575       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4576    (((5*I)/2)*cWW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*
4577      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4578      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4579    ((I/4)*cWW*ee^3*H^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4580       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4581    ((I/2)*cWW*ee^3*H*vev*A[Index[Lorentz, mu$1]]*
4582      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4583      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4584    (I*cA*ee^3*vev^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4585       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
4586    ((I/4)*cWW*ee^3*vev^2*A[Index[Lorentz, mu$1]]*
4587      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4588      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4589    (cHW*ee^2*G0*del[G0, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4590       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4591    ((I/2)*cHW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*
4592      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4593      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4594    (I*cWW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4595       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4596    ((I/2)*cHW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
4597      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4598      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4599    (I*cWW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
4600      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4601      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4602    (cWW*ee^2*GPbar*del[GP, Index[Lorentz, mu$1]]*
4603      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4604      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4605    (cHW*ee^2*GP*del[GPbar, Index[Lorentz, mu$1]]*
4606      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4607      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4608    (cWW*ee^2*GP*del[GPbar, Index[Lorentz, mu$1]]*
4609      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4610      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4611    ((I/2)*cHW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*
4612      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4613      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4614    (I*cWW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4615       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4616    (cHW*ee^2*H*del[H, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4617       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4618    (cHW*ee^2*vev*del[H, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4619       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4620    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4621       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$1]],
4622       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 +
4623    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4624       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$1]],
4625       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4626    I*ee*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4627      Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]] +
4628    ((I/2)*cWW*ee^3*G0^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4629       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4630    (I*cHW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4631       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4632    ((2*I)*cWW*ee^3*GP*GPbar*A[Index[Lorentz, mu$1]]*
4633      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4634      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4635    ((I/2)*cWW*ee^3*H^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4636       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4637    (I*cWW*ee^3*H*vev*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4638       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4639    (I*cA*ee^3*vev^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4640       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/MW^2 +
4641    ((I/2)*cWW*ee^3*vev^2*A[Index[Lorentz, mu$1]]*
4642      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4643      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4644    (cHW*ee^2*G0*del[G0, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4645       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4646    ((I/2)*cHW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*
4647      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4648      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4649    ((I/2)*cWW*ee^2*H*del[G0, Index[Lorentz, mu$1]]*
4650      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4651      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4652    ((I/2)*cHW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
4653      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4654      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4655    ((I/2)*cWW*ee^2*vev*del[G0, Index[Lorentz, mu$1]]*
4656      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4657      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4658    (cWW*ee^2*GPbar*del[GP, Index[Lorentz, mu$1]]*
4659      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4660      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4661    (cHW*ee^2*GP*del[GPbar, Index[Lorentz, mu$1]]*
4662      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4663      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4664    (cWW*ee^2*GP*del[GPbar, Index[Lorentz, mu$1]]*
4665      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4666      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4667    ((I/2)*cHW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*
4668      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4669      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4670    ((I/2)*cWW*ee^2*G0*del[H, Index[Lorentz, mu$1]]*
4671      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4672      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4673    (cHW*ee^2*H*del[H, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4674       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4675    (cHW*ee^2*vev*del[H, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4676       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4677    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4678       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$3]],
4679       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
4680    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4681       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$3]],
4682       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4683    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
4684       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
4685       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
4686    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4687       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$3]],
4688       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 +
4689    ((2*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4690       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$3]],
4691       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 +
4692    ((2*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4693       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$3]],
4694       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4695    ((I/2)*cHB*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4696      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4697      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) -
4698    (cHB*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
4699       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*cw*MW^2) -
4700    ((I/2)*cHW*cw*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4701      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4702      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4703    (I*cw*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
4704       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4705    (cHW*cw*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
4706       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4707    (cw*cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
4708       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4709    (cHB*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
4710       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*cw*MW^2) +
4711    (cHW*cw*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
4712       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4713    (cw*cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
4714       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4715    (cHB*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
4716       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*cw*MW^2) -
4717    (cHW*cw*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*
4718      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4719      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4720    (cw*cWW*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*
4721      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4722      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4723    (cHB*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$1]],
4724       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*cw*MW^2) -
4725    ((I/2)*cHB*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4726      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4727      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) +
4728    (cHW*cw*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*
4729      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4730      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4731    (cw*cWW*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*
4732      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4733      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4734    ((I/2)*cHW*cw*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4735      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4736      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4737    (I*cw*cWW*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4738      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4739      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4740    ((I/2)*cHB*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4741      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4742      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) +
4743    ((I/2)*cHW*cw*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4744      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4745      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4746    (I*cw*cWW*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4747      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4748      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4749    ((I/2)*cHB*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4750      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4751      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) -
4752    ((I/2)*cHW*cw*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4753      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4754      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4755    (I*cw*cWW*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4756      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4757      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4758    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4759       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$1]],
4760       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
4761    ((I/2)*cHB*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4762      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4763      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) +
4764    (cHB*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4765       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*cw*MW^2) +
4766    ((I/2)*cHW*cw*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4767      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4768      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4769    ((I/2)*cw*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
4770      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4771      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4772    (cHW*cw*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4773       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4774    (cw*cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4775       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4776    (cHB*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4777       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*cw*MW^2) -
4778    (cHW*cw*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4779       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4780    (cw*cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4781       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4782    (cHB*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4783       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*cw*MW^2) +
4784    (cHW*cw*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*
4785      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4786      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4787    (cw*cWW*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*
4788      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4789      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4790    (cHB*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
4791       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*cw*MW^2) +
4792    ((I/2)*cHB*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4793      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4794      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) -
4795    (cHW*cw*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*
4796      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4797      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4798    (cw*cWW*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*
4799      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4800      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4801    ((I/2)*cHW*cw*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4802      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4803      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4804    ((I/2)*cw*cWW*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
4805      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4806      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4807    ((I/2)*cHB*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4808      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4809      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) -
4810    ((I/2)*cHW*cw*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4811      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4812      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4813    ((I/2)*cw*cWW*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
4814      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4815      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4816    ((I/2)*cHB*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4817      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4818      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) +
4819    ((I/2)*cHW*cw*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4820      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4821      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4822    ((I/2)*cw*cWW*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
4823      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$1]]*
4824      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4825    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4826       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$3]],
4827       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
4828    ((2*I)*c2W*cw*ee*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
4829       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
4830       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4831    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
4832       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
4833       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4834    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4835       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
4836       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4837    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
4838       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$4]],
4839       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
4840       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
4841      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4842    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
4843       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$4]],
4844       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
4845       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
4846      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
4847    (ee^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4848      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/2 -
4849    (cWW*ee^4*G0^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4850      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(4*MW^2*sw^2) -
4851    (cHW*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4852      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4853    (3*cWW*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4854      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4855    (cWW*ee^4*H^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4856      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(4*MW^2*sw^2) -
4857    (cWW*ee^4*H*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4858      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4859    (cA*ee^4*vev^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4860      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
4861    (cWW*ee^4*vev^2*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4862      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(4*MW^2*sw^2) -
4863    (c2W*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
4864      A[Index[Lorentz, mu$3]]^2*W[Index[Lorentz, mu$1]]*
4865      Wbar[Index[Lorentz, mu$2]])/MW^2 -
4866    ((I/2)*cHW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4867      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4868    (cHW*ee^3*H*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4869      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4870    (cWW*ee^3*H*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4871      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4872    (cHW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4873      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4874    (cWW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4875      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4876    (cHW*ee^2*del[G0, Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
4877      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4878    ((I/2)*cWW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*
4879      del[GP, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4880      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4881    (I*cHW*ee^3*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
4882      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4883    ((I/2)*cWW*ee^3*GP*A[Index[Lorentz, mu$1]]*
4884      del[GPbar, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4885      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4886    (cHW*ee^2*del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
4887      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4888    (cHW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4889      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
4890    (cWW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4891      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4892    ((I/2)*cHW*ee^3*H*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4893      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4894    ((I/2)*cHW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4895      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4896    (I*cHW*ee^2*del[G0, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4897      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4898    (cHW*ee^2*del[H, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
4899      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) -
4900    I*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4901     W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]] +
4902    ((I/4)*cHB*ee^3*G0^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4903      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4904    ((I/4)*cHW*ee^3*G0^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4905      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4906    (((3*I)/4)*cWW*ee^3*G0^2*del[A[Index[Lorentz, mu$1]],
4907       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4908      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4909    ((I/2)*cHB*ee^3*GP*GPbar*del[A[Index[Lorentz, mu$1]],
4910       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4911      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4912    ((I/2)*cHW*ee^3*GP*GPbar*del[A[Index[Lorentz, mu$1]],
4913       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4914      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4915    (((3*I)/2)*cWW*ee^3*GP*GPbar*del[A[Index[Lorentz, mu$1]],
4916       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4917      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4918    ((I/4)*cHB*ee^3*H^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4919      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4920    ((I/4)*cHW*ee^3*H^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4921      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4922    (((3*I)/4)*cWW*ee^3*H^2*del[A[Index[Lorentz, mu$1]],
4923       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4924      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4925    ((I/2)*cHB*ee^3*H*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4926      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4927    ((I/2)*cHW*ee^3*H*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4928      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4929    (((3*I)/2)*cWW*ee^3*H*vev*del[A[Index[Lorentz, mu$1]],
4930       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4931      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4932    (I*cA*ee^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4933      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/MW^2 +
4934    ((I/4)*cHB*ee^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4935      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4936    ((I/4)*cHW*ee^3*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4937      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4938    (((3*I)/4)*cWW*ee^3*vev^2*del[A[Index[Lorentz, mu$1]],
4939       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4940      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
4941    (c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4942      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
4943      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/MW^2 +
4944    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$2]],
4945        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]]*
4946      Wbar[Index[Lorentz, mu$2]])/MW^2 +
4947    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$2]],
4948        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]]*
4949      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
4950    (4*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4951      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
4952      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
4953    ((I/4)*cHW*cw*ee^3*G0^2*del[Z[Index[Lorentz, mu$1]],
4954       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4955      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
4956    (((3*I)/4)*cw*cWW*ee^3*G0^2*del[Z[Index[Lorentz, mu$1]],
4957       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4958      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
4959    ((I/2)*cHW*cw*ee^3*GP*GPbar*del[Z[Index[Lorentz, mu$1]],
4960       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4961      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
4962    (((3*I)/2)*cw*cWW*ee^3*GP*GPbar*del[Z[Index[Lorentz, mu$1]],
4963       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4964      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
4965    ((I/4)*cHW*cw*ee^3*H^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4966      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
4967    (((3*I)/4)*cw*cWW*ee^3*H^2*del[Z[Index[Lorentz, mu$1]],
4968       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4969      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
4970    (I*cw*ee*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4971      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/sw -
4972    ((I/4)*cHB*ee^3*G0^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4973      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(cw*MW^2*sw) +
4974    ((I/2)*cHB*ee^3*GP*GPbar*del[Z[Index[Lorentz, mu$1]],
4975       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4976      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2*sw) -
4977    ((I/4)*cHB*ee^3*H^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4978      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(cw*MW^2*sw) +
4979    ((I/2)*cHW*cw*ee^3*H*vev*del[Z[Index[Lorentz, mu$1]],
4980       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4981      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
4982    (((3*I)/2)*cw*cWW*ee^3*H*vev*del[Z[Index[Lorentz, mu$1]],
4983       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4984      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
4985    ((I/2)*cHB*ee^3*H*vev*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4986      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(cw*MW^2*sw) +
4987    ((I/4)*cHW*cw*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]],
4988       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4989      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
4990    (((3*I)/4)*cw*cWW*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]],
4991       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
4992      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
4993    (I*cA*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4994      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(cw*MW^2*sw) -
4995    ((I/4)*cHB*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4996      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(cw*MW^2*sw) +
4997    (I*cA*cw*ee^3*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
4998      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
4999    ((2*I)*cA*ee^3*sw*vev^2*del[Z[Index[Lorentz, mu$1]],
5000       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
5001      Wbar[Index[Lorentz, mu$2]])/(cw*MW^2) -
5002    (2*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5003      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
5004      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
5005    (c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5006      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
5007      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5008    ee^2*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5009     Wbar[Index[Lorentz, mu$2]] + (cWW*ee^4*G0^2*A[Index[Lorentz, mu$1]]^2*
5010      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
5011    (2*cHW*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5012      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5013    (3*cWW*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5014      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5015    (cWW*ee^4*H^2*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5016      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
5017    (cWW*ee^4*H*vev*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5018      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5019    (2*cA*ee^4*vev^2*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5020      Wbar[Index[Lorentz, mu$2]])/MW^2 +
5021    (cWW*ee^4*vev^2*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5022      Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^2) +
5023    (cHW*ee^3*H*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$1]]*
5024      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5025    (cWW*ee^3*H*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$1]]*
5026      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5027    (cHW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$1]]*
5028      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5029    (cWW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$1]]*
5030      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5031    (I*cHW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$1]]*
5032      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5033    (I*cWW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$1]]*
5034      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5035    (I*cHW*ee^3*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$1]]*
5036      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5037    (I*cWW*ee^3*GP*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$1]]*
5038      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5039    (cHW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$1]]*
5040      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5041    (cWW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$1]]*
5042      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5043    (cHW*ee^4*G0*GPbar*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5044      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) -
5045    (cWW*ee^4*G0*GPbar*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5046      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) +
5047    ((I/2)*cHW*ee^4*GPbar*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5048      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5049    ((I/2)*cWW*ee^4*GPbar*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5050      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5051    ((I/2)*cHW*ee^4*GPbar*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5052      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5053    ((I/2)*cWW*ee^4*GPbar*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5054      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5055    ((I/2)*cHW*ee^3*GPbar*del[G0, Index[Lorentz, mu$1]]*
5056      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5057      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5058    ((I/2)*cWW*ee^3*GPbar*del[G0, Index[Lorentz, mu$1]]*
5059      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5060      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5061    ((I/2)*cHW*ee^3*G0*del[GPbar, Index[Lorentz, mu$1]]*
5062      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5063      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5064    ((I/2)*cWW*ee^3*G0*del[GPbar, Index[Lorentz, mu$1]]*
5065      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5066      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5067    (cHW*ee^3*H*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5068      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) +
5069    (cWW*ee^3*H*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5070      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) +
5071    (cHW*ee^3*vev*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5072      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) +
5073    (cWW*ee^3*vev*del[GPbar, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5074      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) -
5075    (cHW*ee^3*GPbar*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5076      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) -
5077    (cWW*ee^3*GPbar*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5078      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) -
5079    (c2W*ee^4*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
5080      A[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
5081      Wbar[Index[Lorentz, mu$2]])/MW^2 +
5082    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5083      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5084      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
5085    ((3*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5086      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5087      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5088    (4*c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5089      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5090      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
5091    ((6*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]^2*del[A[Index[Lorentz, mu$2]],
5092       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
5093      Wbar[Index[Lorentz, mu$2]])/MW^2 +
5094    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]^2*del[A[Index[Lorentz, mu$2]],
5095       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
5096      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5097    (c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5098      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5099      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
5100    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5101      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5102      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 +
5103    ((3*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5104      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5105      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5106    (2*c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5107      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5108      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/MW^2 -
5109    (6*c3W*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5110      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5111      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) +
5112    (8*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5113      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5114      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5115    (4*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5116      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5117      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5118    (6*c3W*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5119      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5120      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) -
5121    (4*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5122      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5123      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5124    ((3*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5125      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5126      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5127    ((2*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5128      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5129      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
5130    (8*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5131      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5132      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) +
5133    (4*c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5134      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5135      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5136    ((6*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]^2*del[Z[Index[Lorentz, mu$2]],
5137       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
5138      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5139    ((6*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]^2*del[Z[Index[Lorentz, mu$2]],
5140       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
5141      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
5142    (2*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5143      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5144      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
5145    (c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5146      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5147      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5148    ((3*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5149      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5150      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5151    (I*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5152      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5153      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
5154    (4*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5155      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5156      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw) -
5157    (2*c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5158      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5159      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5160    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5161       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5162      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) -
5163    ((4*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5164       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5165      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5166    (2*c2W*ee^2*del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5167       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]^2*
5168      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) +
5169    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
5170       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]^2*
5171      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) -
5172    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
5173       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]^2*
5174      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5175    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5176       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]^2*
5177      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) +
5178    ((4*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5179       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]^2*
5180      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5181    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5182      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
5183      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
5184       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
5185      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5186    (2*ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5187      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
5188      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
5189       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
5190      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) -
5191    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5192      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
5193      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
5194       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
5195      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5196    ((2*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5197       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
5198       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
5199      W[Index[Lorentz, mu$5]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) +
5200    (c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5201      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
5202      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5203    (cHW*ee^4*G0*GP*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5204      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) -
5205    (cWW*ee^4*G0*GP*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5206      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) -
5207    ((I/2)*cHW*ee^4*GP*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5208      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5209    ((I/2)*cWW*ee^4*GP*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5210      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5211    ((I/2)*cHW*ee^4*GP*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5212      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5213    ((I/2)*cWW*ee^4*GP*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5214      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5215    ((I/2)*cHW*ee^3*GP*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5216      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5217    ((I/2)*cWW*ee^3*GP*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5218      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5219    ((I/2)*cHW*ee^3*G0*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5220      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) -
5221    ((I/2)*cWW*ee^3*G0*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5222      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5223    (cHW*ee^3*H*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5224      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) +
5225    (cWW*ee^3*H*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5226      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) +
5227    (cHW*ee^3*vev*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5228      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) +
5229    (cWW*ee^3*vev*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5230      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) -
5231    (cHW*ee^3*GP*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5232      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) -
5233    (cWW*ee^3*GP*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5234      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^3) +
5235    (cHW*ee^4*G0^2*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5236      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(4*MW^2*sw^4) +
5237    (cWW*ee^4*G0^2*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5238      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^4) +
5239    (cHW*ee^4*GP*GPbar*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5240      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^4) +
5241    (cWW*ee^4*GP*GPbar*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5242      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) +
5243    (cHW*ee^4*H^2*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5244      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(4*MW^2*sw^4) +
5245    (cWW*ee^4*H^2*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5246      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^4) -
5247    (ee^2*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5248      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*sw^2) +
5249    (cHW*ee^4*H*vev*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5250      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^4) +
5251    (cWW*ee^4*H*vev*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5252      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) +
5253    (cHW*ee^4*vev^2*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5254      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(4*MW^2*sw^4) +
5255    (cWW*ee^4*vev^2*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5256      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(2*MW^2*sw^4) +
5257    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5258       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
5259      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) -
5260    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5261       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
5262      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5263    (6*c3W*ee^6*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5264      W[Index[Lorentz, mu$3]]^2*Wbar[Index[Lorentz, mu$1]]*
5265      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^4) +
5266    (3*c2W*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5267      W[Index[Lorentz, mu$3]]^2*Wbar[Index[Lorentz, mu$1]]*
5268      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5269    ((2*I)*c2W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5270      W[Index[Lorentz, mu$3]]^2*Wbar[Index[Lorentz, mu$1]]*
5271      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^2) -
5272    ((2*I)*c2W*cw*ee^3*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5273      W[Index[Lorentz, mu$3]]^2*Wbar[Index[Lorentz, mu$1]]*
5274      Wbar[Index[Lorentz, mu$2]])/(MW^2*sw^3) +
5275    (cHW*ee^4*G0*GP*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5276      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^3) +
5277    (cWW*ee^4*G0*GP*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5278      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^3) +
5279    ((I/2)*cHW*ee^4*GP*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5280      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^3) +
5281    ((I/2)*cWW*ee^4*GP*H*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5282      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^3) +
5283    ((I/2)*cHW*ee^4*GP*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5284      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^3) +
5285    ((I/2)*cWW*ee^4*GP*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5286      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^3) -
5287    ((I/2)*cHW*ee^3*GP*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5288      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^3) -
5289    ((I/2)*cWW*ee^3*GP*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5290      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^3) +
5291    ((I/2)*cHW*ee^3*G0*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5292      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^3) +
5293    ((I/2)*cWW*ee^3*G0*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5294      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^3) -
5295    (cHW*ee^3*H*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5296      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^3) -
5297    (cWW*ee^3*H*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5298      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^3) -
5299    (cHW*ee^3*vev*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5300      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^3) -
5301    (cWW*ee^3*vev*del[GP, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5302      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^3) +
5303    (cHW*ee^3*GP*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5304      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^3) +
5305    (cWW*ee^3*GP*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$1]]*
5306      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^3) -
5307    (cHW*ee^4*G0^2*W[Index[Lorentz, mu$1]]^2*Wbar[Index[Lorentz, mu$2]]^2)/
5308     (4*MW^2*sw^4) - (cWW*ee^4*G0^2*W[Index[Lorentz, mu$1]]^2*
5309      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^4) -
5310    (cHW*ee^4*GP*GPbar*W[Index[Lorentz, mu$1]]^2*Wbar[Index[Lorentz, mu$2]]^
5311       2)/(2*MW^2*sw^4) - (cWW*ee^4*GP*GPbar*W[Index[Lorentz, mu$1]]^2*
5312      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^4) -
5313    (cHW*ee^4*H^2*W[Index[Lorentz, mu$1]]^2*Wbar[Index[Lorentz, mu$2]]^2)/
5314     (4*MW^2*sw^4) - (cWW*ee^4*H^2*W[Index[Lorentz, mu$1]]^2*
5315      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^4) +
5316    (ee^2*W[Index[Lorentz, mu$1]]^2*Wbar[Index[Lorentz, mu$2]]^2)/(2*sw^2) -
5317    (cHW*ee^4*H*vev*W[Index[Lorentz, mu$1]]^2*Wbar[Index[Lorentz, mu$2]]^2)/
5318     (2*MW^2*sw^4) - (cWW*ee^4*H*vev*W[Index[Lorentz, mu$1]]^2*
5319      Wbar[Index[Lorentz, mu$2]]^2)/(MW^2*sw^4) -
5320    (cHW*ee^4*vev^2*W[Index[Lorentz, mu$1]]^2*Wbar[Index[Lorentz, mu$2]]^2)/
5321     (4*MW^2*sw^4) - (cWW*ee^4*vev^2*W[Index[Lorentz, mu$1]]^2*
5322      Wbar[Index[Lorentz, mu$2]]^2)/(2*MW^2*sw^4) +
5323    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]^2*del[del[W[Index[Lorentz, mu$2]],
5324        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5325      Wbar[Index[Lorentz, mu$3]])/MW^2 -
5326    ((2*I)*c2W*ee*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5327      del[del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]],
5328       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5329    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5330      A[Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$1]],
5331       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5332    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5333       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$1]],
5334       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/MW^2 -
5335    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5336       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$1]],
5337       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5338    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
5339      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5340      Wbar[Index[Lorentz, mu$3]])/MW^2 -
5341    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5342       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$1]],
5343       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5344    ((4*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5345       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$1]],
5346       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5347    ((4*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5348       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$1]],
5349       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5350    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5351      A[Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$2]],
5352       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/MW^2 -
5353    (8*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5354       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$2]],
5355       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5356    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5357       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$2]],
5358       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5359    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
5360      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5361      Wbar[Index[Lorentz, mu$3]])/MW^2 +
5362    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
5363       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$2]],
5364       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5365    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5366       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5367       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5368    ((4*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5369       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5370       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/MW^2 -
5371    ((4*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5372       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5373       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5374    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
5375      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5376      Wbar[Index[Lorentz, mu$3]])/MW^2 +
5377    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5378       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
5379       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/MW^2 -
5380    ((2*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5381       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
5382       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/MW^2 -
5383    ((2*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5384       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
5385       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5386    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
5387      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5388      Wbar[Index[Lorentz, mu$3]])/MW^2 -
5389    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
5390       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
5391       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5392    (6*c3W*ee^4*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5393       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$3]],
5394       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5395    ((2*I)*c2W*ee*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5396       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$3]],
5397       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5398    ((2*I)*c2W*cw*ee*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5399       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$3]],
5400       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5401    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5402       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$1]],
5403       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5404    ((4*I)*c2W*cw*ee*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5405       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$1]],
5406       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5407    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5408       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$1]],
5409       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5410    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5411       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$2]],
5412       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5413    ((4*I)*c2W*cw*ee*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5414       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
5415       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5416    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
5417       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
5418       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5419    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
5420       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
5421       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5422    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5423       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
5424       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5425    (8*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5426       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
5427       Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5428    ((2*I)*c2W*cw*ee*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5429       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
5430       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5431    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5432       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
5433       Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5434    ((2*I)*c2W*cw*ee*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5435       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
5436       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5437    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
5438       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
5439       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5440    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
5441       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
5442       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5443    (6*c3W*cw*ee^4*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5444       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
5445       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5446    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5447       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
5448       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5449    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5450       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$4]],
5451       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5452       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
5453      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5454    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5455       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$4]],
5456       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5457       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
5458      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5459    (c2W*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
5460      A[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]]*
5461      Wbar[Index[Lorentz, mu$3]])/MW^2 -
5462    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5463      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5464      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5465    ((3*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5466      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5467      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5468    (2*c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5469      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5470      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5471    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5472      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5473      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/MW^2 -
5474    ((3*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5475      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5476      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5477    (c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5478      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5479      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/MW^2 -
5480    (2*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$2]],
5481        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
5482      Wbar[Index[Lorentz, mu$3]])/MW^2 -
5483    (2*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$2]],
5484        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
5485      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5486    (6*c3W*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5487      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5488      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5489    (6*c3W*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5490      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5491      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5492    ((3*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5493      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5494      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5495    ((2*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5496      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5497      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5498    (4*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5499      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5500      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5501    (2*c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5502      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5503      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5504    ((3*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5505      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5506      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5507    (I*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5508      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5509      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5510    (2*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5511      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5512      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5513    (c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5514      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5515      W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5516    (c2W*ee^4*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]*
5517      A[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
5518      Wbar[Index[Lorentz, mu$3]])/MW^2 -
5519    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5520      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5521      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5522    ((3*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5523      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5524      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5525    (4*c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5526      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5527      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5528    ((6*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]^2*del[A[Index[Lorentz, mu$2]],
5529       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
5530      Wbar[Index[Lorentz, mu$3]])/MW^2 -
5531    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]^2*del[A[Index[Lorentz, mu$2]],
5532       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
5533      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5534    (c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5535      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5536      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5537    (I*c2W*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5538      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5539      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/MW^2 -
5540    ((3*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5541      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5542      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5543    (2*c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5544      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5545      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5546    (6*c3W*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5547      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5548      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5549    (2*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5550      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5551      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5552    (6*c3W*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5553      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5554      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5555    ((3*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5556      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5557      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5558    ((2*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5559      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5560      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5561    (8*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5562      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5563      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5564    (4*c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5565      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5566      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5567    ((6*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]^2*del[Z[Index[Lorentz, mu$2]],
5568       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
5569      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5570    ((6*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]^2*del[Z[Index[Lorentz, mu$2]],
5571       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
5572      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5573    (2*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5574      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5575      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5576    (c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5577      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5578      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5579    ((3*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5580      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5581      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5582    (I*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5583      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5584      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5585    (4*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5586      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5587      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) -
5588    (2*c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5589      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5590      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5591    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5592       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5593      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5594    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5595       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5596      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5597    (2*c2W*ee^4*A[Index[Lorentz, mu$1]]^2*A[Index[Lorentz, mu$2]]^2*
5598      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/MW^2 +
5599    (2*c2W*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5600      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
5601      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/MW^2 -
5602    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$1]],
5603        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5604      Wbar[Index[Lorentz, mu$3]])/MW^2 +
5605    (4*c2W*ee^2*A[Index[Lorentz, mu$1]]*del[del[A[Index[Lorentz, mu$2]],
5606        Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5607      Wbar[Index[Lorentz, mu$3]])/MW^2 -
5608    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$1]],
5609        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5610      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5611    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[del[Z[Index[Lorentz, mu$2]],
5612        Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5613      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5614    (2*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5615      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
5616      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5617    (4*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5618      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
5619      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw) +
5620    (2*c2W*cw^2*ee^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5621      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
5622      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5623    (2*c2W*ee^2*del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5624       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5625      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5626    (2*c2W*ee^2*del[del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5627       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5628      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5629    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
5630       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5631      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5632    ((10*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
5633       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5634      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5635    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5636       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5637      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) -
5638    ((8*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5639       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5640      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5641    (3*ee^4*GP*GPbar*tcHW*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5642      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5643       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5644      Wbar[Index[Lorentz, mu$3]])/(2*MW^2*sw^2) -
5645    ((I/2)*ee^3*G0*tcHW*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
5646      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5647       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5648      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5649    (ee^3*H*tcHW*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
5650      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5651       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5652      Wbar[Index[Lorentz, mu$3]])/(2*MW^2*sw^2) +
5653    (ee^3*tcHW*vev*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
5654      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5655       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5656      Wbar[Index[Lorentz, mu$3]])/(2*MW^2*sw^2) -
5657    ((I/2)*ee^3*GPbar*tcHW*A[Index[Lorentz, mu$1]]*
5658      del[GP, Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1],
5659       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5660      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5661    (((3*I)/2)*ee^3*GP*tcHW*A[Index[Lorentz, mu$1]]*
5662      del[GPbar, Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1],
5663       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5664      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5665    (ee^2*tcHW*del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
5666      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5667       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5668      Wbar[Index[Lorentz, mu$3]])/(2*MW^2*sw^2) -
5669    (ee^3*G0*tcHW*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
5670      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5671       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5672      Wbar[Index[Lorentz, mu$3]])/(2*MW^2*sw^2) -
5673    ((I/2)*ee^3*H*tcHW*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
5674      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5675       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5676      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5677    ((I/2)*ee^3*tcHW*vev*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
5678      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5679       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5680      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5681    ((I/2)*ee^2*tcHW*del[G0, Index[Lorentz, mu$1]]*
5682      del[H, Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1],
5683       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5684      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5685    ((I/4)*ee^3*G0^2*tcHB*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5686      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5687       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5688      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5689    ((I/4)*ee^3*H^2*tcHB*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5690      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5691       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5692      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5693    ((I/4)*ee^3*G0^2*tcHW*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5694      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5695       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5696      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5697    ((I/4)*ee^3*H^2*tcHW*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5698      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5699       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5700      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5701    ((I/2)*ee^3*H*tcHB*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5702      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5703       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5704      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5705    ((I/2)*ee^3*H*tcHW*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5706      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5707       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5708      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5709    ((I/4)*ee^3*tcHB*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5710      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5711       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5712      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5713    ((I/4)*ee^3*tcHW*vev^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5714      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5715       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5716      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5717    ((I/4)*ee^3*G0^2*tcHB*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5718      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5719       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5720      Wbar[Index[Lorentz, mu$3]])/(cw*MW^2*sw) +
5721    ((I/4)*ee^3*H^2*tcHB*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5722      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5723       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5724      Wbar[Index[Lorentz, mu$3]])/(cw*MW^2*sw) -
5725    ((I/4)*cw*ee^3*G0^2*tcHW*del[Z[Index[Lorentz, mu$1]],
5726       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5727       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5728      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5729    ((I/4)*cw*ee^3*H^2*tcHW*del[Z[Index[Lorentz, mu$1]],
5730       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5731       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5732      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5733    ((I/2)*ee^3*H*tcHB*vev*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5734      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5735       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5736      Wbar[Index[Lorentz, mu$3]])/(cw*MW^2*sw) -
5737    ((I/2)*cw*ee^3*H*tcHW*vev*del[Z[Index[Lorentz, mu$1]],
5738       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5739       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5740      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5741    ((I/4)*ee^3*tcHB*vev^2*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5742      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5743       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5744      Wbar[Index[Lorentz, mu$3]])/(cw*MW^2*sw) -
5745    ((I/4)*cw*ee^3*tcHW*vev^2*del[Z[Index[Lorentz, mu$1]],
5746       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5747       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5748      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5749    (ee^4*G0*GPbar*tcHW*A[Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
5750       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5751      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
5752      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^3) -
5753    ((I/4)*ee^4*GPbar*H*tcHW*A[Index[Lorentz, mu$1]]*
5754      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5755       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
5756      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5757    ((I/4)*ee^4*GPbar*tcHW*vev*A[Index[Lorentz, mu$1]]*
5758      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5759       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
5760      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5761    ((I/4)*ee^3*GPbar*tcHW*del[G0, Index[Lorentz, mu$1]]*
5762      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5763       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
5764      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5765    ((I/4)*ee^3*G0*tcHW*del[GPbar, Index[Lorentz, mu$1]]*
5766      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5767       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
5768      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5769    (ee^3*H*tcHW*del[GPbar, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
5770       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5771      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
5772      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^3) -
5773    (ee^3*tcHW*vev*del[GPbar, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
5774       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5775      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
5776      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^3) +
5777    (ee^3*GPbar*tcHW*del[H, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
5778       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5779      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
5780      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^3) -
5781    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5782      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
5783      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
5784       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
5785      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5786    (2*ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5787      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
5788      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
5789       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
5790      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) -
5791    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5792      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
5793      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
5794       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
5795      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5796    ((2*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
5797       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5798       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
5799      W[Index[Lorentz, mu$5]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5800    (2*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5801      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5802      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5803    (c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5804      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
5805      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5806    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5807       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
5808      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5809    ((4*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5810       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
5811      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5812    (2*c2W*ee^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5813       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5814      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5815    (6*c3W*ee^6*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5816      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5817      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) -
5818    (5*c2W*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5819      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5820      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5821    ((6*I)*c2W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5822      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5823      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5824    ((6*I)*c2W*cw*ee^3*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5825      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5826      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5827    (ee^4*G0^2*tcHW*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5828       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*
5829      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$1]]*
5830      Wbar[Index[Lorentz, mu$3]])/(8*MW^2*sw^4) -
5831    (ee^4*H^2*tcHW*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5832       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*
5833      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$1]]*
5834      Wbar[Index[Lorentz, mu$3]])/(8*MW^2*sw^4) -
5835    (ee^4*H*tcHW*vev*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5836       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*
5837      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$1]]*
5838      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^4) -
5839    (ee^4*tcHW*vev^2*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5840       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*
5841      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$1]]*
5842      Wbar[Index[Lorentz, mu$3]])/(8*MW^2*sw^4) -
5843    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5844      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
5845       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$5]]*
5846      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]])/(2*MW^2*sw^4) -
5847    (4*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5848      del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
5849      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5850    (c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5851      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5852      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5853    (2*c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5854      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
5855      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5856    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5857       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$1]]*
5858      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5859    (2*c2W*ee^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5860       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5861      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5862    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
5863       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5864      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) -
5865    ((10*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
5866       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
5867      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5868    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5869       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5870      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5871    ((8*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5872       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5873      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5874    (6*c3W*ee^6*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5875      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5876      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) -
5877    (5*c2W*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5878      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5879      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5880    ((6*I)*c2W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5881      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5882      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) +
5883    ((6*I)*c2W*cw*ee^3*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5884      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
5885      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5886    (6*c3W*ee^6*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5887      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
5888      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) +
5889    (8*c2W*ee^4*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5890      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
5891      Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^2) -
5892    (3*ee^4*G0*GP*tcHW*A[Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
5893       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5894      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$2]]*
5895      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^3) -
5896    (((3*I)/4)*ee^4*GP*H*tcHW*A[Index[Lorentz, mu$1]]*
5897      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5898       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5899      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5900    (((3*I)/4)*ee^4*GP*tcHW*vev*A[Index[Lorentz, mu$1]]*
5901      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5902       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5903      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5904    ((I/4)*ee^3*GP*tcHW*del[G0, Index[Lorentz, mu$1]]*
5905      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5906       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5907      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) -
5908    ((I/4)*ee^3*G0*tcHW*del[GP, Index[Lorentz, mu$1]]*
5909      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5910       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
5911      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^3) +
5912    (ee^3*H*tcHW*del[GP, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
5913       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5914      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$2]]*
5915      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^3) +
5916    (ee^3*tcHW*vev*del[GP, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
5917       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5918      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$2]]*
5919      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^3) -
5920    (ee^3*GP*tcHW*del[H, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
5921       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5922      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$2]]*
5923      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^3) +
5924    (ee^4*GP*GPbar*tcHW*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5925       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$1]]*
5926      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$2]]*
5927      Wbar[Index[Lorentz, mu$3]])/(4*MW^2*sw^4) -
5928    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5929      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
5930       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$5]]*
5931      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(2*MW^2*sw^4) +
5932    (2*c2W*ee^4*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5933      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]]*
5934      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]])/(MW^2*sw^4) -
5935    (c2W*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$1]]*
5936      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
5937      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^2) +
5938    (2*c2W*ee^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5939       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$1]]*
5940      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^2) -
5941    (2*c2W*ee^2*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
5942       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5943      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^2) -
5944    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
5945       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
5946      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^4) +
5947    ((2*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
5948       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
5949      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^2) +
5950    ((6*I)*c3W*ee^5*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5951       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5952      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^4) -
5953    ((4*I)*c2W*ee^3*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
5954       Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5955      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^2) -
5956    (6*c3W*ee^6*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5957      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5958      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^4) +
5959    (3*c2W*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5960      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5961      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^2) +
5962    ((2*I)*c2W*ee^3*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5963      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5964      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^2) +
5965    ((2*I)*c2W*cw*ee^3*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
5966      W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
5967      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^3) +
5968    (6*c3W*ee^6*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]^2*
5969      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^4) -
5970    (4*c2W*ee^4*A[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]^2*
5971      Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^2) -
5972    (c2W*ee^4*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]^2*
5973      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^4) -
5974    (c2W*ee^4*W[Index[Lorentz, mu$1]]^2*W[Index[Lorentz, mu$2]]*
5975      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]]^2)/(MW^2*sw^4) -
5976    (I*ee^3*GP*tcHW*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5977      del[G0, Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1],
5978       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5979      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) +
5980    (ee^2*tcHW*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
5981      del[GP, Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1],
5982       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5983      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) +
5984    (ee^3*GP*tcHW*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
5985      del[H, Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1],
5986       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5987      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) -
5988    (I*ee^2*tcHW*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
5989      del[H, Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1],
5990       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5991      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) -
5992    ((I/2)*ee^3*G0*GP*tcHB*A[Index[Lorentz, mu$1]]*
5993      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
5994      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
5995       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) +
5996    (ee^3*GP*H*tcHB*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
5997       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
5998       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
5999      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw) -
6000    ((I/2)*ee^3*G0*GP*tcHW*A[Index[Lorentz, mu$1]]*
6001      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6002      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6003       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) +
6004    (ee^3*GP*H*tcHW*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6005       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6006       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6007      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw) +
6008    (ee^3*GP*tcHB*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6009       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6010       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6011      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw) +
6012    (ee^3*GP*tcHW*vev*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6013       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6014       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6015      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw) +
6016    (ee^2*GP*tcHB*del[G0, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6017       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6018       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6019      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw) -
6020    (ee^2*GP*tcHW*del[G0, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6021       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6022       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6023      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw) +
6024    (ee^2*G0*tcHB*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6025       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6026       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6027      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw) +
6028    ((I/2)*ee^2*H*tcHB*del[GP, Index[Lorentz, mu$1]]*
6029      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6030      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6031       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) +
6032    (ee^2*G0*tcHW*del[GP, Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6033       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6034       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6035      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw) +
6036    ((I/2)*ee^2*H*tcHW*del[GP, Index[Lorentz, mu$1]]*
6037      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6038      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6039       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) +
6040    ((I/2)*ee^2*tcHB*vev*del[GP, Index[Lorentz, mu$1]]*
6041      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6042      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6043       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) +
6044    ((I/2)*ee^2*tcHW*vev*del[GP, Index[Lorentz, mu$1]]*
6045      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6046      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6047       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) +
6048    ((I/2)*ee^2*GP*tcHB*del[H, Index[Lorentz, mu$1]]*
6049      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6050      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6051       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) -
6052    ((I/2)*ee^2*GP*tcHW*del[H, Index[Lorentz, mu$1]]*
6053      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6054      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6055       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw) -
6056    (I*ee^3*GP*GPbar*tcHW*A[Index[Lorentz, mu$1]]*
6057      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6058      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6059       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6060    (ee^2*G0*tcHW*del[G0, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6061       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6062       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6063      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
6064    ((I/2)*ee^2*H*tcHW*del[G0, Index[Lorentz, mu$1]]*
6065      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6066      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6067       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6068    ((I/2)*ee^2*tcHW*vev*del[G0, Index[Lorentz, mu$1]]*
6069      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6070      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6071       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6072    (ee^2*GP*tcHW*del[GPbar, Index[Lorentz, mu$1]]*
6073      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6074      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6075       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6076    ((I/2)*ee^2*G0*tcHW*del[H, Index[Lorentz, mu$1]]*
6077      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6078      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6079       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6080    (ee^2*H*tcHW*del[H, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6081       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6082       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6083      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
6084    (ee^2*tcHW*vev*del[H, Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6085       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6086       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6087      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) +
6088    ((I/2)*ee^3*G0*GP*tcHB*A[Index[Lorentz, mu$1]]*
6089      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6090      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6091       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(cw*MW^2) -
6092    (ee^3*GP*H*tcHB*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
6093       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6094       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6095      Wbar[Index[Lorentz, mu$4]])/(2*cw*MW^2) -
6096    ((I/2)*cw*ee^3*G0*GP*tcHW*A[Index[Lorentz, mu$1]]*
6097      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6098      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6099       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6100    (cw*ee^3*GP*H*tcHW*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
6101       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6102       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6103      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
6104    (ee^3*GP*tcHB*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
6105       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6106       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6107      Wbar[Index[Lorentz, mu$4]])/(2*cw*MW^2) +
6108    (cw*ee^3*GP*tcHW*vev*A[Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
6109       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6110       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6111      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
6112    (ee^2*GP*tcHB*del[G0, Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
6113       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6114       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6115      Wbar[Index[Lorentz, mu$4]])/(2*cw*MW^2) -
6116    (cw*ee^2*GP*tcHW*del[G0, Index[Lorentz, mu$1]]*
6117      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6118      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6119       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
6120    (ee^2*G0*tcHB*del[GP, Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$2]],
6121       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6122       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6123      Wbar[Index[Lorentz, mu$4]])/(2*cw*MW^2) -
6124    ((I/2)*ee^2*H*tcHB*del[GP, Index[Lorentz, mu$1]]*
6125      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6126      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6127       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(cw*MW^2) +
6128    (cw*ee^2*G0*tcHW*del[GP, Index[Lorentz, mu$1]]*
6129      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6130      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6131       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) +
6132    ((I/2)*cw*ee^2*H*tcHW*del[GP, Index[Lorentz, mu$1]]*
6133      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6134      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6135       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6136    ((I/2)*ee^2*tcHB*vev*del[GP, Index[Lorentz, mu$1]]*
6137      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6138      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6139       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(cw*MW^2) +
6140    ((I/2)*cw*ee^2*tcHW*vev*del[GP, Index[Lorentz, mu$1]]*
6141      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6142      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6143       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6144    ((I/2)*ee^2*GP*tcHB*del[H, Index[Lorentz, mu$1]]*
6145      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6146      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6147       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(cw*MW^2) -
6148    ((I/2)*cw*ee^2*GP*tcHW*del[H, Index[Lorentz, mu$1]]*
6149      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6150      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6151       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6152    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6153       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$4]],
6154       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6155       Index[Lorentz, mu$3], Index[Lorentz, mu$5]]*
6156      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6157    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6158       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$4]],
6159       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6160       Index[Lorentz, mu$3], Index[Lorentz, mu$5]]*
6161      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) -
6162    (ee^4*GP*GPbar*tcHW*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6163      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6164       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6165      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) +
6166    ((I/2)*ee^3*G0*tcHW*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
6167      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6168       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6169      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6170    (ee^3*H*tcHW*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
6171      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6172       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6173      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) +
6174    (ee^3*tcHW*vev*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
6175      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6176       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6177      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) +
6178    (((3*I)/2)*ee^3*GPbar*tcHW*A[Index[Lorentz, mu$1]]*
6179      del[GP, Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1],
6180       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6181      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6182    ((I/2)*ee^3*GP*tcHW*A[Index[Lorentz, mu$1]]*
6183      del[GPbar, Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1],
6184       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6185      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6186    (ee^2*tcHW*del[GP, Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
6187      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6188       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6189      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) -
6190    (ee^3*G0*tcHW*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
6191      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6192       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6193      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^2) +
6194    ((I/2)*ee^3*H*tcHW*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
6195      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6196       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6197      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6198    ((I/2)*ee^3*tcHW*vev*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
6199      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6200       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6201      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6202    ((I/2)*ee^2*tcHW*del[G0, Index[Lorentz, mu$1]]*
6203      del[H, Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1],
6204       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6205      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6206    ((I/2)*ee^3*GP*GPbar*tcHB*del[A[Index[Lorentz, mu$1]],
6207       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6208       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6209      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6210    ((I/2)*ee^3*GP*GPbar*tcHW*del[A[Index[Lorentz, mu$1]],
6211       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6212       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6213      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6214    ((I/2)*ee^3*GP*GPbar*tcHB*del[Z[Index[Lorentz, mu$1]],
6215       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6216       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6217      Wbar[Index[Lorentz, mu$4]])/(cw*MW^2*sw) +
6218    ((I/2)*cw*ee^3*GP*GPbar*tcHW*del[Z[Index[Lorentz, mu$1]],
6219       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6220       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6221      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
6222    (ee^4*G0*GPbar*tcHW*A[Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6223       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6224      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
6225      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^3) -
6226    ((I/4)*ee^4*GPbar*H*tcHW*A[Index[Lorentz, mu$1]]*
6227      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6228       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
6229      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) -
6230    ((I/4)*ee^4*GPbar*tcHW*vev*A[Index[Lorentz, mu$1]]*
6231      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6232       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
6233      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) -
6234    ((I/4)*ee^3*GPbar*tcHW*del[G0, Index[Lorentz, mu$1]]*
6235      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6236       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
6237      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
6238    ((I/4)*ee^3*G0*tcHW*del[GPbar, Index[Lorentz, mu$1]]*
6239      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6240       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
6241      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
6242    (ee^3*H*tcHW*del[GPbar, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6243       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6244      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
6245      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^3) +
6246    (ee^3*tcHW*vev*del[GPbar, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6247       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6248      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
6249      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^3) -
6250    (ee^3*GPbar*tcHW*del[H, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6251       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6252      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
6253      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^3) +
6254    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6255      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6256      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6257       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6258      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6259    (2*ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6260      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6261      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6262       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6263      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6264    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6265      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6266      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6267       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6268      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
6269    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6270      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6271      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6272       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6273      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6274    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6275      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
6276      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6277       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6278      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6279    (ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6280      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6281      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6282       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6283      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) -
6284    (ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6285      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
6286      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6287       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6288      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6289    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6290      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6291      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6292       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6293      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) -
6294    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6295      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
6296      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6297       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6298      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
6299    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6300      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
6301      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6302       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6303      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) +
6304    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]^2*del[A[Index[Lorentz, mu$2]],
6305       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6306       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6307      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6308    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6309      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
6310      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6311       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6312      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^2) -
6313    (ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6314      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
6315      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6316       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6317      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6318    (ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6319      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
6320      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6321       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6322      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6323    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6324      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
6325      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6326       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6327      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
6328    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]^2*del[Z[Index[Lorentz, mu$2]],
6329       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6330       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6331      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) -
6332    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6333      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
6334      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6335       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6336      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
6337    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6338       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6339       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$1]]*
6340      W[Index[Lorentz, mu$5]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6341    ((3*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6342       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
6343       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]]*
6344      W[Index[Lorentz, mu$5]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) -
6345    ((3*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6346       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6347       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6348      W[Index[Lorentz, mu$5]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6349    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
6350       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6351       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6352      W[Index[Lorentz, mu$5]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) -
6353    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6354       Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6355       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6356      W[Index[Lorentz, mu$5]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6357    ((2*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6358       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6359       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$5]]^2*
6360      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6361    (ee^4*G0^2*tcHW*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6362       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*
6363      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]]*
6364      Wbar[Index[Lorentz, mu$4]])/(8*MW^2*sw^4) +
6365    (ee^4*H^2*tcHW*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6366       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*
6367      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]]*
6368      Wbar[Index[Lorentz, mu$4]])/(8*MW^2*sw^4) +
6369    (ee^4*H*tcHW*vev*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6370       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*
6371      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]]*
6372      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^4) +
6373    (ee^4*tcHW*vev^2*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6374       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*
6375      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$1]]*
6376      Wbar[Index[Lorentz, mu$4]])/(8*MW^2*sw^4) +
6377    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6378       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6379       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6380      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6381    (ee^4*G0*GP*tcHW*A[Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6382       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6383      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
6384      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^3) +
6385    ((I/4)*ee^4*GP*H*tcHW*A[Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6386       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6387      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
6388      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
6389    ((I/4)*ee^4*GP*tcHW*vev*A[Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6390       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6391      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
6392      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) -
6393    ((I/4)*ee^3*GP*tcHW*del[G0, Index[Lorentz, mu$1]]*
6394      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6395       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6396      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) +
6397    ((I/4)*ee^3*G0*tcHW*del[GP, Index[Lorentz, mu$1]]*
6398      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6399       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*
6400      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) -
6401    (ee^3*H*tcHW*del[GP, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6402       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6403      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
6404      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^3) -
6405    (ee^3*tcHW*vev*del[GP, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6406       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6407      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
6408      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^3) +
6409    (ee^3*GP*tcHW*del[H, Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$1],
6410       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6411      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
6412      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^3) -
6413    (ee^4*GP*GPbar*tcHW*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6414       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$1]]*
6415      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
6416      Wbar[Index[Lorentz, mu$4]])/(4*MW^2*sw^4) +
6417    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6418       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
6419       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6420      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6421    (ee^6*tc3W*A[Index[Lorentz, mu$1]]^2*Eps[Index[Lorentz, mu$2],
6422       Index[Lorentz, mu$3], Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6423      W[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$5]]*
6424      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^4) +
6425    ((I/2)*ee^3*G0*GP*tcHW*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6426      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6427       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$3]]*
6428      Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^3) -
6429    (ee^3*GP*H*tcHW*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6430      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6431       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$3]]*
6432      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^3) -
6433    (ee^3*GP*tcHW*vev*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6434      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6435       Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$3]]*
6436      Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^3) -
6437    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6438       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6439       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6440      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6441    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
6442       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6443       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6444      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) -
6445    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6446       Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6447       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
6448      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6449    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6450      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6451       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$5]]*
6452      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^4) +
6453    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6454      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6455       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$5]]*
6456      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^4) -
6457    (ee^6*tc3W*A[Index[Lorentz, mu$1]]^2*Eps[Index[Lorentz, mu$2],
6458       Index[Lorentz, mu$3], Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6459      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$5]]*
6460      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(2*MW^2*sw^4) -
6461    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6462      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6463       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$5]]^2*
6464      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$4]])/(MW^2*sw^4) +
6465    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6466       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$4]],
6467       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6468       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6469      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
6470    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6471       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$4]],
6472       Index[Lorentz, mu$5]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6473       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
6474      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
6475    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6476       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$3]],
6477       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6478       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6479      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
6480    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6481       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$4]],
6482       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6483       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6484      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
6485    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6486       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$3]],
6487       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6488       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6489      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
6490    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6491       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$4]],
6492       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6493       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6494      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6495    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6496       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$2]],
6497       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
6498       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6499      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6500    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6501       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$4]],
6502       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
6503       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6504      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6505    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6506       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$2]],
6507       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
6508       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6509      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6510    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6511       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$4]],
6512       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
6513       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6514      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6515    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6516       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$1]],
6517       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6518       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6519      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6520    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$1]],
6521       Index[Lorentz, mu$2]]*del[W[Index[Lorentz, mu$3]],
6522       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6523       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6524      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
6525    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6526       Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$3]],
6527       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6528       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6529      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6530    (2*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
6531       Index[Lorentz, mu$3]]*del[W[Index[Lorentz, mu$4]],
6532       Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6533       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6534      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6535    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6536       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$1]],
6537       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6538       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6539      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6540    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
6541       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
6542       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6543       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6544      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
6545    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6546       Index[Lorentz, mu$1]]*del[Z[Index[Lorentz, mu$3]],
6547       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6548       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6549      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6550    (2*cw*ee^4*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6551       Index[Lorentz, mu$3]]*del[Z[Index[Lorentz, mu$4]],
6552       Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6553       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6554      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
6555    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6556      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6557      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6558       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$1]]*
6559      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
6560    (2*ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6561      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6562      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6563       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$1]]*
6564      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6565    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6566      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6567      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6568       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$1]]*
6569      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
6570    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6571      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6572      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6573       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]]*
6574      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6575    (2*ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6576      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6577      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6578       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]]*
6579      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6580    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6581      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6582      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6583       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]]*
6584      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
6585    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6586      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6587      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
6588       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6589      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6590    (2*ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6591      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6592      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
6593       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6594      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6595    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6596      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6597      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$4],
6598       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6599      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6600    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6601      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6602      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6603       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6604      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
6605    (2*ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6606      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6607      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6608       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6609      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6610    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6611      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
6612      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6613       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6614      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6615    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6616      del[A[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6617      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6618       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6619      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6620    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6621      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
6622      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6623       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6624      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
6625    (ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6626      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6627      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6628       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6629      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6630    (ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6631      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
6632      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6633       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6634      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6635    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6636      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
6637      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6638       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6639      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
6640    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6641      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
6642      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6643       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6644      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6645    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6646      del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
6647      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6648       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6649      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) -
6650    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]^2*del[A[Index[Lorentz, mu$2]],
6651       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6652       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6653      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6654    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6655      del[A[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
6656      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6657       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6658      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^2) +
6659    (ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6660      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
6661      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6662       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6663      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6664    (ee^4*tc3W*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
6665      del[Wbar[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
6666      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6667       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6668      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6669    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6670      del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$3]]*
6671      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6672       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6673      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6674    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]^2*del[Z[Index[Lorentz, mu$2]],
6675       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6676       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6677      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) +
6678    (I*cw*ee^5*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6679      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$1]]*
6680      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6681       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6682      Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^3) -
6683    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6684       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6685       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$1]]*
6686      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6687    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6688       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
6689       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]]*
6690      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6691    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6692       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6693       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6694      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6695    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$1]],
6696       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6697       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6698      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6699    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6700       Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6701       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6702      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6703    ((2*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
6704       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6705       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
6706      W[Index[Lorentz, mu$5]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6707    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6708       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6709       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6710      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6711    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6712      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6713       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$4]]*
6714      Wbar[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$5]])/(2*MW^2*sw^4) -
6715    ((3*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6716       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
6717       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6718      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6719    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6720      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6721       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$4]]*
6722      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$5]])/(2*MW^2*sw^4) -
6723    (ee^6*tc3W*A[Index[Lorentz, mu$1]]^2*Eps[Index[Lorentz, mu$2],
6724       Index[Lorentz, mu$3], Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6725      W[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$4]]*
6726      Wbar[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$5]])/(2*MW^2*sw^4) +
6727    ((3*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6728       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6729       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6730      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6731    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$1]],
6732       Index[Lorentz, mu$2]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6733       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6734      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6735    (I*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6736       Index[Lorentz, mu$1]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6737       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$4]]*
6738      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6739    (ee^6*tc3W*A[Index[Lorentz, mu$1]]^2*Eps[Index[Lorentz, mu$2],
6740       Index[Lorentz, mu$3], Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*
6741      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
6742      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$5]])/(2*MW^2*sw^4) +
6743    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6744      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6745       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$5]]*
6746      Wbar[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6747    ((2*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6748       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3],
6749       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]]*
6750      Wbar[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6751    ((2*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6752       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6753       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$3]]*
6754      Wbar[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6755    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6756      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6757       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$3]]*
6758      Wbar[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(2*MW^2*sw^4) -
6759    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6760      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
6761       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
6762      Wbar[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(2*MW^2*sw^4) +
6763    ((2*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6764       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6765       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$5]]*
6766      Wbar[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) +
6767    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6768      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6769       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$5]]*
6770      Wbar[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$5]])/(MW^2*sw^4) -
6771    ((2*I)*ee^5*tc3W*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
6772       Index[Lorentz, mu$3]]*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
6773       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$4]]*
6774      Wbar[Index[Lorentz, mu$5]]^2)/(MW^2*sw^4) -
6775    (ee^6*tc3W*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
6776      Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2], Index[Lorentz, mu$3],
6777       Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$4]]*
6778      Wbar[Index[Lorentz, mu$5]]^2)/(MW^2*sw^4) -
6779    (I*G0*dqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
6780        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
6781        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
6782      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6783      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6784     Sqrt[2] - ((I/2)*cd*G0*dqbar[Index[Spin, SP$1], Index[Generation,
6785         Generation$1], Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
6786        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
6787      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6788      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6789     Sqrt[2] - (H*dqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
6790        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
6791        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
6792      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6793      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6794     Sqrt[2] - (3*cd*H*dqbar[Index[Spin, SP$1], Index[Generation,
6795         Generation$1], Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
6796        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
6797      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6798      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6799     (2*Sqrt[2]) + (cH*H*dqbar[Index[Spin, SP$1], Index[Generation,
6800         Generation$1], Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
6801        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
6802      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6803      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6804     (2*Sqrt[2]) - ((I/2)*cd*G0^3*dqbar[Index[Spin, SP$1],
6805        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6806       dq[Index[Spin, SP$2], Index[Generation, Generation$2],
6807        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6808      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6809     (Sqrt[2]*vev^2) - (I*cd*G0*GP*GPbar*dqbar[Index[Spin, SP$1],
6810        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6811       dq[Index[Spin, SP$2], Index[Generation, Generation$2],
6812        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6813      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6814     (Sqrt[2]*vev^2) - (cd*G0^2*H*dqbar[Index[Spin, SP$1],
6815        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6816       dq[Index[Spin, SP$2], Index[Generation, Generation$2],
6817        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6818      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6819     (2*Sqrt[2]*vev^2) - (cd*GP*GPbar*H*dqbar[Index[Spin, SP$1],
6820        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6821       dq[Index[Spin, SP$2], Index[Generation, Generation$2],
6822        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6823      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6824     (Sqrt[2]*vev^2) - ((I/2)*cd*G0*H^2*dqbar[Index[Spin, SP$1],
6825        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6826       dq[Index[Spin, SP$2], Index[Generation, Generation$2],
6827        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6828      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6829     (Sqrt[2]*vev^2) -
6830    (cd*H^3*dqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
6831        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
6832        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
6833      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6834      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6835     (2*Sqrt[2]*vev^2) -
6836    (cd*G0^2*dqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
6837        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
6838        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
6839      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6840      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6841     (2*Sqrt[2]*vev) - (cd*GP*GPbar*dqbar[Index[Spin, SP$1],
6842        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6843       dq[Index[Spin, SP$2], Index[Generation, Generation$2],
6844        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6845      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6846     (Sqrt[2]*vev) - (I*cd*G0*H*dqbar[Index[Spin, SP$1],
6847        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6848       dq[Index[Spin, SP$2], Index[Generation, Generation$2],
6849        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6850      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6851     (Sqrt[2]*vev) - (3*cd*H^2*dqbar[Index[Spin, SP$1],
6852        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6853       dq[Index[Spin, SP$2], Index[Generation, Generation$2],
6854        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6855      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6856     (2*Sqrt[2]*vev) -
6857    (vev*dqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
6858        Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
6859        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
6860      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6861      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6862     Sqrt[2] - (cd*vev*dqbar[Index[Spin, SP$1], Index[Generation,
6863         Generation$1], Index[Colour, Colour$1]] . dq[Index[Spin, SP$2],
6864        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
6865      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6866      yd[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6867     (2*Sqrt[2]) + I*GP*CKM[Index[Generation, Generation$1],
6868      Index[Generation, Generation$2]]*uqbar[Index[Spin, SP$1],
6869       Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6870      dq[Index[Spin, SP$2], Index[Generation, Generation$3],
6871       Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6872     yd[Index[Generation, Generation$2], Index[Generation, Generation$3]] +
6873    (I/2)*cd*GP*CKM[Index[Generation, Generation$1],
6874      Index[Generation, Generation$2]]*uqbar[Index[Spin, SP$1],
6875       Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6876      dq[Index[Spin, SP$2], Index[Generation, Generation$3],
6877       Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6878     yd[Index[Generation, Generation$2], Index[Generation, Generation$3]] +
6879    ((I/2)*cd*G0^2*GP*CKM[Index[Generation, Generation$1],
6880       Index[Generation, Generation$2]]*uqbar[Index[Spin, SP$1],
6881        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6882       dq[Index[Spin, SP$2], Index[Generation, Generation$3],
6883        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6884      yd[Index[Generation, Generation$2], Index[Generation, Generation$3]])/
6885     vev^2 + (I*cd*GP^2*GPbar*CKM[Index[Generation, Generation$1],
6886       Index[Generation, Generation$2]]*uqbar[Index[Spin, SP$1],
6887        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6888       dq[Index[Spin, SP$2], Index[Generation, Generation$3],
6889        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6890      yd[Index[Generation, Generation$2], Index[Generation, Generation$3]])/
6891     vev^2 + ((I/2)*cd*GP*H^2*CKM[Index[Generation, Generation$1],
6892       Index[Generation, Generation$2]]*uqbar[Index[Spin, SP$1],
6893        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6894       dq[Index[Spin, SP$2], Index[Generation, Generation$3],
6895        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6896      yd[Index[Generation, Generation$2], Index[Generation, Generation$3]])/
6897     vev^2 + (I*cd*GP*H*CKM[Index[Generation, Generation$1],
6898       Index[Generation, Generation$2]]*uqbar[Index[Spin, SP$1],
6899        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
6900       dq[Index[Spin, SP$2], Index[Generation, Generation$3],
6901        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6902      yd[Index[Generation, Generation$2], Index[Generation, Generation$3]])/
6903     vev - (I*G0*lbar[Index[Spin, SP$1], Index[Generation, Generation$1]] .
6904       l[Index[Spin, SP$2], Index[Generation, Generation$2]]*
6905      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6906      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6907     Sqrt[2] - ((I/2)*cl*G0*lbar[Index[Spin, SP$1], Index[Generation,
6908         Generation$1]] . l[Index[Spin, SP$2], Index[Generation,
6909         Generation$2]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6910      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6911     Sqrt[2] - (H*lbar[Index[Spin, SP$1], Index[Generation, Generation$1]] .
6912       l[Index[Spin, SP$2], Index[Generation, Generation$2]]*
6913      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6914      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6915     Sqrt[2] + (cH*H*lbar[Index[Spin, SP$1], Index[Generation,
6916         Generation$1]] . l[Index[Spin, SP$2], Index[Generation,
6917         Generation$2]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6918      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6919     (2*Sqrt[2]) - (3*cl*H*lbar[Index[Spin, SP$1], Index[Generation,
6920         Generation$1]] . l[Index[Spin, SP$2], Index[Generation,
6921         Generation$2]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6922      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6923     (2*Sqrt[2]) - ((I/2)*cl*G0^3*lbar[Index[Spin, SP$1],
6924        Index[Generation, Generation$1]] . l[Index[Spin, SP$2],
6925        Index[Generation, Generation$2]]*ProjP[Index[Spin, SP$1],
6926       Index[Spin, SP$2]]*yl[Index[Generation, Generation$1],
6927       Index[Generation, Generation$2]])/(Sqrt[2]*vev^2) -
6928    (I*cl*G0*GP*GPbar*lbar[Index[Spin, SP$1], Index[Generation,
6929         Generation$1]] . l[Index[Spin, SP$2], Index[Generation,
6930         Generation$2]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6931      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6932     (Sqrt[2]*vev^2) -
6933    (cl*G0^2*H*lbar[Index[Spin, SP$1], Index[Generation, Generation$1]] .
6934       l[Index[Spin, SP$2], Index[Generation, Generation$2]]*
6935      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6936      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6937     (2*Sqrt[2]*vev^2) -
6938    (cl*GP*GPbar*H*lbar[Index[Spin, SP$1], Index[Generation, Generation$1]] .
6939       l[Index[Spin, SP$2], Index[Generation, Generation$2]]*
6940      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6941      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6942     (Sqrt[2]*vev^2) - ((I/2)*cl*G0*H^2*lbar[Index[Spin, SP$1],
6943        Index[Generation, Generation$1]] . l[Index[Spin, SP$2],
6944        Index[Generation, Generation$2]]*ProjP[Index[Spin, SP$1],
6945       Index[Spin, SP$2]]*yl[Index[Generation, Generation$1],
6946       Index[Generation, Generation$2]])/(Sqrt[2]*vev^2) -
6947    (cl*H^3*lbar[Index[Spin, SP$1], Index[Generation, Generation$1]] .
6948       l[Index[Spin, SP$2], Index[Generation, Generation$2]]*
6949      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6950      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6951     (2*Sqrt[2]*vev^2) -
6952    (cl*G0^2*lbar[Index[Spin, SP$1], Index[Generation, Generation$1]] .
6953       l[Index[Spin, SP$2], Index[Generation, Generation$2]]*
6954      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6955      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6956     (2*Sqrt[2]*vev) - (cl*GP*GPbar*lbar[Index[Spin, SP$1],
6957        Index[Generation, Generation$1]] . l[Index[Spin, SP$2],
6958        Index[Generation, Generation$2]]*ProjP[Index[Spin, SP$1],
6959       Index[Spin, SP$2]]*yl[Index[Generation, Generation$1],
6960       Index[Generation, Generation$2]])/(Sqrt[2]*vev) -
6961    (I*cl*G0*H*lbar[Index[Spin, SP$1], Index[Generation, Generation$1]] .
6962       l[Index[Spin, SP$2], Index[Generation, Generation$2]]*
6963      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6964      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6965     (Sqrt[2]*vev) - (3*cl*H^2*lbar[Index[Spin, SP$1],
6966        Index[Generation, Generation$1]] . l[Index[Spin, SP$2],
6967        Index[Generation, Generation$2]]*ProjP[Index[Spin, SP$1],
6968       Index[Spin, SP$2]]*yl[Index[Generation, Generation$1],
6969       Index[Generation, Generation$2]])/(2*Sqrt[2]*vev) -
6970    (vev*lbar[Index[Spin, SP$1], Index[Generation, Generation$1]] .
6971       l[Index[Spin, SP$2], Index[Generation, Generation$2]]*
6972      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6973      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6974     Sqrt[2] - (cl*vev*lbar[Index[Spin, SP$1], Index[Generation,
6975         Generation$1]] . l[Index[Spin, SP$2], Index[Generation,
6976         Generation$2]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6977      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6978     (2*Sqrt[2]) + I*GP*vlbar[Index[Spin, SP$1], Index[Generation,
6979        Generation$1]] . l[Index[Spin, SP$2], Index[Generation,
6980        Generation$2]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6981     yl[Index[Generation, Generation$1], Index[Generation, Generation$2]] +
6982    (I/2)*cl*GP*vlbar[Index[Spin, SP$1], Index[Generation, Generation$1]] .
6983      l[Index[Spin, SP$2], Index[Generation, Generation$2]]*
6984     ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6985     yl[Index[Generation, Generation$1], Index[Generation, Generation$2]] +
6986    ((I/2)*cl*G0^2*GP*vlbar[Index[Spin, SP$1], Index[Generation,
6987         Generation$1]] . l[Index[Spin, SP$2], Index[Generation,
6988         Generation$2]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6989      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6990     vev^2 + (I*cl*GP^2*GPbar*vlbar[Index[Spin, SP$1],
6991        Index[Generation, Generation$1]] . l[Index[Spin, SP$2],
6992        Index[Generation, Generation$2]]*ProjP[Index[Spin, SP$1],
6993       Index[Spin, SP$2]]*yl[Index[Generation, Generation$1],
6994       Index[Generation, Generation$2]])/vev^2 +
6995    ((I/2)*cl*GP*H^2*vlbar[Index[Spin, SP$1], Index[Generation,
6996         Generation$1]] . l[Index[Spin, SP$2], Index[Generation,
6997         Generation$2]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
6998      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
6999     vev^2 + (I*cl*GP*H*vlbar[Index[Spin, SP$1], Index[Generation,
7000         Generation$1]] . l[Index[Spin, SP$2], Index[Generation,
7001         Generation$2]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7002      yl[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7003     vev + (I*G0*uqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
7004        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7005        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
7006      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7007      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7008     Sqrt[2] + ((I/2)*cu*G0*uqbar[Index[Spin, SP$1], Index[Generation,
7009         Generation$1], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7010        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
7011      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7012      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7013     Sqrt[2] - (H*uqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
7014        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7015        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
7016      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7017      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7018     Sqrt[2] + (cH*H*uqbar[Index[Spin, SP$1], Index[Generation,
7019         Generation$1], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7020        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
7021      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7022      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7023     (2*Sqrt[2]) - (3*cu*H*uqbar[Index[Spin, SP$1], Index[Generation,
7024         Generation$1], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7025        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
7026      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7027      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7028     (2*Sqrt[2]) + ((I/2)*cu*G0^3*uqbar[Index[Spin, SP$1],
7029        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
7030       uq[Index[Spin, SP$2], Index[Generation, Generation$2],
7031        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7032      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7033     (Sqrt[2]*vev^2) + (I*cu*G0*GP*GPbar*uqbar[Index[Spin, SP$1],
7034        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
7035       uq[Index[Spin, SP$2], Index[Generation, Generation$2],
7036        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7037      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7038     (Sqrt[2]*vev^2) - (cu*G0^2*H*uqbar[Index[Spin, SP$1],
7039        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
7040       uq[Index[Spin, SP$2], Index[Generation, Generation$2],
7041        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7042      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7043     (2*Sqrt[2]*vev^2) - (cu*GP*GPbar*H*uqbar[Index[Spin, SP$1],
7044        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
7045       uq[Index[Spin, SP$2], Index[Generation, Generation$2],
7046        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7047      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7048     (Sqrt[2]*vev^2) + ((I/2)*cu*G0*H^2*uqbar[Index[Spin, SP$1],
7049        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
7050       uq[Index[Spin, SP$2], Index[Generation, Generation$2],
7051        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7052      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7053     (Sqrt[2]*vev^2) -
7054    (cu*H^3*uqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
7055        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7056        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
7057      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7058      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7059     (2*Sqrt[2]*vev^2) -
7060    (cu*G0^2*uqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
7061        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7062        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
7063      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7064      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7065     (2*Sqrt[2]*vev) - (cu*GP*GPbar*uqbar[Index[Spin, SP$1],
7066        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
7067       uq[Index[Spin, SP$2], Index[Generation, Generation$2],
7068        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7069      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7070     (Sqrt[2]*vev) + (I*cu*G0*H*uqbar[Index[Spin, SP$1],
7071        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
7072       uq[Index[Spin, SP$2], Index[Generation, Generation$2],
7073        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7074      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7075     (Sqrt[2]*vev) - (3*cu*H^2*uqbar[Index[Spin, SP$1],
7076        Index[Generation, Generation$1], Index[Colour, Colour$1]] .
7077       uq[Index[Spin, SP$2], Index[Generation, Generation$2],
7078        Index[Colour, Colour$1]]*ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7079      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7080     (2*Sqrt[2]*vev) -
7081    (vev*uqbar[Index[Spin, SP$1], Index[Generation, Generation$1],
7082        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7083        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
7084      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7085      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7086     Sqrt[2] - (cu*vev*uqbar[Index[Spin, SP$1], Index[Generation,
7087         Generation$1], Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7088        Index[Generation, Generation$2], Index[Colour, Colour$1]]*
7089      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7090      yu[Index[Generation, Generation$1], Index[Generation, Generation$2]])/
7091     (2*Sqrt[2]) + I*GPbar*Conjugate[CKM[Index[Generation, Generation$1],
7092       Index[Generation, Generation$2]]]*
7093     dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
7094       Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7095       Index[Generation, Generation$3], Index[Colour, Colour$1]]*
7096     ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7097     yu[Index[Generation, Generation$1], Index[Generation, Generation$3]] +
7098    (I/2)*cu*GPbar*Conjugate[CKM[Index[Generation, Generation$1],
7099       Index[Generation, Generation$2]]]*
7100     dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
7101       Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7102       Index[Generation, Generation$3], Index[Colour, Colour$1]]*
7103     ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7104     yu[Index[Generation, Generation$1], Index[Generation, Generation$3]] +
7105    ((I/2)*cu*G0^2*GPbar*Conjugate[CKM[Index[Generation, Generation$1],
7106        Index[Generation, Generation$2]]]*
7107      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
7108        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7109        Index[Generation, Generation$3], Index[Colour, Colour$1]]*
7110      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7111      yu[Index[Generation, Generation$1], Index[Generation, Generation$3]])/
7112     vev^2 + (I*cu*GP*GPbar^2*Conjugate[CKM[Index[Generation, Generation$1],
7113        Index[Generation, Generation$2]]]*
7114      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
7115        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7116        Index[Generation, Generation$3], Index[Colour, Colour$1]]*
7117      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7118      yu[Index[Generation, Generation$1], Index[Generation, Generation$3]])/
7119     vev^2 + ((I/2)*cu*GPbar*H^2*Conjugate[
7120       CKM[Index[Generation, Generation$1], Index[Generation, Generation$2]]]*
7121      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
7122        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7123        Index[Generation, Generation$3], Index[Colour, Colour$1]]*
7124      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7125      yu[Index[Generation, Generation$1], Index[Generation, Generation$3]])/
7126     vev^2 + (I*cu*GPbar*H*Conjugate[CKM[Index[Generation, Generation$1],
7127        Index[Generation, Generation$2]]]*
7128      dqbar[Index[Spin, SP$1], Index[Generation, Generation$2],
7129        Index[Colour, Colour$1]] . uq[Index[Spin, SP$2],
7130        Index[Generation, Generation$3], Index[Colour, Colour$1]]*
7131      ProjP[Index[Spin, SP$1], Index[Spin, SP$2]]*
7132      yu[Index[Generation, Generation$1], Index[Generation, Generation$3]])/
7133     vev + (cw*ee^2*GP*GPbar*A[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7134     sw + (cT*cw*ee^2*GP*GPbar*A[Index[Lorentz, mu$1]]*
7135      Z[Index[Lorentz, mu$1]])/sw - (ee^2*GP*GPbar*sw*A[Index[Lorentz, mu$1]]*
7136      Z[Index[Lorentz, mu$1]])/cw +
7137    (cT*ee^2*GP*GPbar*sw*A[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7138     cw + (cT*cw*ee^2*G0^2*GP*GPbar*A[Index[Lorentz, mu$1]]*
7139      Z[Index[Lorentz, mu$1]])/(sw*vev^2) -
7140    (2*cT*cw*ee^2*GP^2*GPbar^2*A[Index[Lorentz, mu$1]]*
7141      Z[Index[Lorentz, mu$1]])/(sw*vev^2) +
7142    (cT*cw*ee^2*GP*GPbar*H^2*A[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7143     (sw*vev^2) + (cT*ee^2*G0^2*GP*GPbar*sw*A[Index[Lorentz, mu$1]]*
7144      Z[Index[Lorentz, mu$1]])/(cw*vev^2) +
7145    (2*cT*ee^2*GP^2*GPbar^2*sw*A[Index[Lorentz, mu$1]]*
7146      Z[Index[Lorentz, mu$1]])/(cw*vev^2) +
7147    (cT*ee^2*GP*GPbar*H^2*sw*A[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7148     (cw*vev^2) + (2*cT*cw*ee^2*GP*GPbar*H*A[Index[Lorentz, mu$1]]*
7149      Z[Index[Lorentz, mu$1]])/(sw*vev) +
7150    (2*cT*ee^2*GP*GPbar*H*sw*A[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7151     (cw*vev) + (cA*ee^4*GP*GPbar*vev^2*A[Index[Lorentz, mu$1]]*
7152      Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7153    (cA*ee^4*GP*GPbar*sw*vev^2*A[Index[Lorentz, mu$1]]*
7154      Z[Index[Lorentz, mu$1]])/(cw^3*MW^2) -
7155    (4*cA*ee^4*GP*GPbar*sw*vev^2*A[Index[Lorentz, mu$1]]*
7156      Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7157    (cw*ee*H*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/(2*sw) -
7158    (cH*cw*ee*H*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7159     (4*sw) - (3*cT*cw*ee*H*del[G0, Index[Lorentz, mu$1]]*
7160      Z[Index[Lorentz, mu$1]])/(2*sw) +
7161    (ee*H*sw*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/(2*cw) -
7162    (cH*ee*H*sw*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7163     (4*cw) - (3*cT*ee*H*sw*del[G0, Index[Lorentz, mu$1]]*
7164      Z[Index[Lorentz, mu$1]])/(2*cw) -
7165    (cT*cw*ee*G0^2*H*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7166     (2*sw*vev^2) + (cT*cw*ee*GP*GPbar*H*del[G0, Index[Lorentz, mu$1]]*
7167      Z[Index[Lorentz, mu$1]])/(sw*vev^2) -
7168    (cT*cw*ee*H^3*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7169     (2*sw*vev^2) - (cT*ee*G0^2*H*sw*del[G0, Index[Lorentz, mu$1]]*
7170      Z[Index[Lorentz, mu$1]])/(2*cw*vev^2) -
7171    (cT*ee*GP*GPbar*H*sw*del[G0, Index[Lorentz, mu$1]]*
7172      Z[Index[Lorentz, mu$1]])/(cw*vev^2) -
7173    (cT*ee*H^3*sw*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7174     (2*cw*vev^2) - (cT*cw*ee*G0^2*del[G0, Index[Lorentz, mu$1]]*
7175      Z[Index[Lorentz, mu$1]])/(2*sw*vev) +
7176    (cT*cw*ee*GP*GPbar*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7177     (sw*vev) - (3*cT*cw*ee*H^2*del[G0, Index[Lorentz, mu$1]]*
7178      Z[Index[Lorentz, mu$1]])/(2*sw*vev) -
7179    (cT*ee*G0^2*sw*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7180     (2*cw*vev) - (cT*ee*GP*GPbar*sw*del[G0, Index[Lorentz, mu$1]]*
7181      Z[Index[Lorentz, mu$1]])/(cw*vev) -
7182    (3*cT*ee*H^2*sw*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7183     (2*cw*vev) + (cw*ee*vev*del[G0, Index[Lorentz, mu$1]]*
7184      Z[Index[Lorentz, mu$1]])/(2*sw) -
7185    (cT*cw*ee*vev*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7186     (2*sw) + (ee*sw*vev*del[G0, Index[Lorentz, mu$1]]*
7187      Z[Index[Lorentz, mu$1]])/(2*cw) -
7188    (cT*ee*sw*vev*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7189     (2*cw) + (cA*ee^3*H*vev^2*del[G0, Index[Lorentz, mu$1]]*
7190      Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw) -
7191    (cA*cw*ee^3*H*vev^2*del[G0, Index[Lorentz, mu$1]]*
7192      Z[Index[Lorentz, mu$1]])/(2*MW^2*sw) +
7193    (cA*ee^3*H*sw*vev^2*del[G0, Index[Lorentz, mu$1]]*
7194      Z[Index[Lorentz, mu$1]])/(2*cw^3*MW^2) -
7195    (cA*ee^3*H*sw*vev^2*del[G0, Index[Lorentz, mu$1]]*
7196      Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7197    (cA*ee^3*vev^3*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7198     (2*cw*MW^2*sw) - (cA*cw*ee^3*vev^3*del[G0, Index[Lorentz, mu$1]]*
7199      Z[Index[Lorentz, mu$1]])/(2*MW^2*sw) +
7200    (cA*ee^3*sw*vev^3*del[G0, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7201     (2*cw^3*MW^2) - (cA*ee^3*sw*vev^3*del[G0, Index[Lorentz, mu$1]]*
7202      Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7203    ((I/2)*cw*ee*GPbar*del[GP, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7204     sw + ((I/2)*cT*cw*ee*GPbar*del[GP, Index[Lorentz, mu$1]]*
7205      Z[Index[Lorentz, mu$1]])/sw -
7206    ((I/2)*ee*GPbar*sw*del[GP, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7207     cw + ((I/2)*cT*ee*GPbar*sw*del[GP, Index[Lorentz, mu$1]]*
7208      Z[Index[Lorentz, mu$1]])/cw + ((I/2)*cT*cw*ee*G0^2*GPbar*
7209      del[GP, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/(sw*vev^2) -
7210    (I*cT*cw*ee*GP*GPbar^2*del[GP, Index[Lorentz, mu$1]]*
7211      Z[Index[Lorentz, mu$1]])/(sw*vev^2) +
7212    ((I/2)*cT*cw*ee*GPbar*H^2*del[GP, Index[Lorentz, mu$1]]*
7213      Z[Index[Lorentz, mu$1]])/(sw*vev^2) +
7214    ((I/2)*cT*ee*G0^2*GPbar*sw*del[GP, Index[Lorentz, mu$1]]*
7215      Z[Index[Lorentz, mu$1]])/(cw*vev^2) +
7216    (I*cT*ee*GP*GPbar^2*sw*del[GP, Index[Lorentz, mu$1]]*
7217      Z[Index[Lorentz, mu$1]])/(cw*vev^2) +
7218    ((I/2)*cT*ee*GPbar*H^2*sw*del[GP, Index[Lorentz, mu$1]]*
7219      Z[Index[Lorentz, mu$1]])/(cw*vev^2) +
7220    (I*cT*cw*ee*GPbar*H*del[GP, Index[Lorentz, mu$1]]*
7221      Z[Index[Lorentz, mu$1]])/(sw*vev) +
7222    (I*cT*ee*GPbar*H*sw*del[GP, Index[Lorentz, mu$1]]*
7223      Z[Index[Lorentz, mu$1]])/(cw*vev) +
7224    ((I/2)*cA*ee^3*GPbar*vev^2*del[GP, Index[Lorentz, mu$1]]*
7225      Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7226    ((I/2)*cA*cw*ee^3*GPbar*vev^2*del[GP, Index[Lorentz, mu$1]]*
7227      Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
7228    ((I/2)*cA*ee^3*GPbar*sw*vev^2*del[GP, Index[Lorentz, mu$1]]*
7229      Z[Index[Lorentz, mu$1]])/(cw^3*MW^2) -
7230    (((3*I)/2)*cA*ee^3*GPbar*sw*vev^2*del[GP, Index[Lorentz, mu$1]]*
7231      Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7232    ((I/2)*cw*ee*GP*del[GPbar, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7233     sw - ((I/2)*cT*cw*ee*GP*del[GPbar, Index[Lorentz, mu$1]]*
7234      Z[Index[Lorentz, mu$1]])/sw +
7235    ((I/2)*ee*GP*sw*del[GPbar, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7236     cw - ((I/2)*cT*ee*GP*sw*del[GPbar, Index[Lorentz, mu$1]]*
7237      Z[Index[Lorentz, mu$1]])/cw -
7238    ((I/2)*cT*cw*ee*G0^2*GP*del[GPbar, Index[Lorentz, mu$1]]*
7239      Z[Index[Lorentz, mu$1]])/(sw*vev^2) +
7240    (I*cT*cw*ee*GP^2*GPbar*del[GPbar, Index[Lorentz, mu$1]]*
7241      Z[Index[Lorentz, mu$1]])/(sw*vev^2) -
7242    ((I/2)*cT*cw*ee*GP*H^2*del[GPbar, Index[Lorentz, mu$1]]*
7243      Z[Index[Lorentz, mu$1]])/(sw*vev^2) -
7244    ((I/2)*cT*ee*G0^2*GP*sw*del[GPbar, Index[Lorentz, mu$1]]*
7245      Z[Index[Lorentz, mu$1]])/(cw*vev^2) -
7246    (I*cT*ee*GP^2*GPbar*sw*del[GPbar, Index[Lorentz, mu$1]]*
7247      Z[Index[Lorentz, mu$1]])/(cw*vev^2) -
7248    ((I/2)*cT*ee*GP*H^2*sw*del[GPbar, Index[Lorentz, mu$1]]*
7249      Z[Index[Lorentz, mu$1]])/(cw*vev^2) -
7250    (I*cT*cw*ee*GP*H*del[GPbar, Index[Lorentz, mu$1]]*
7251      Z[Index[Lorentz, mu$1]])/(sw*vev) -
7252    (I*cT*ee*GP*H*sw*del[GPbar, Index[Lorentz, mu$1]]*
7253      Z[Index[Lorentz, mu$1]])/(cw*vev) -
7254    ((I/2)*cA*ee^3*GP*vev^2*del[GPbar, Index[Lorentz, mu$1]]*
7255      Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
7256    ((I/2)*cA*cw*ee^3*GP*vev^2*del[GPbar, Index[Lorentz, mu$1]]*
7257      Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
7258    ((I/2)*cA*ee^3*GP*sw*vev^2*del[GPbar, Index[Lorentz, mu$1]]*
7259      Z[Index[Lorentz, mu$1]])/(cw^3*MW^2) +
7260    (((3*I)/2)*cA*ee^3*GP*sw*vev^2*del[GPbar, Index[Lorentz, mu$1]]*
7261      Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7262    (cw*ee*G0*del[H, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/(2*sw) +
7263    (cH*cw*ee*G0*del[H, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7264     (4*sw) + (cT*cw*ee*G0*del[H, Index[Lorentz, mu$1]]*
7265      Z[Index[Lorentz, mu$1]])/(2*sw) -
7266    (ee*G0*sw*del[H, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/(2*cw) +
7267    (cH*ee*G0*sw*del[H, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7268     (4*cw) + (cT*ee*G0*sw*del[H, Index[Lorentz, mu$1]]*
7269      Z[Index[Lorentz, mu$1]])/(2*cw) +
7270    (cT*cw*ee*G0^3*del[H, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7271     (2*sw*vev^2) - (cT*cw*ee*G0*GP*GPbar*del[H, Index[Lorentz, mu$1]]*
7272      Z[Index[Lorentz, mu$1]])/(sw*vev^2) +
7273    (cT*cw*ee*G0*H^2*del[H, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7274     (2*sw*vev^2) + (cT*ee*G0^3*sw*del[H, Index[Lorentz, mu$1]]*
7275      Z[Index[Lorentz, mu$1]])/(2*cw*vev^2) +
7276    (cT*ee*G0*GP*GPbar*sw*del[H, Index[Lorentz, mu$1]]*
7277      Z[Index[Lorentz, mu$1]])/(cw*vev^2) +
7278    (cT*ee*G0*H^2*sw*del[H, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7279     (2*cw*vev^2) + (cT*cw*ee*G0*H*del[H, Index[Lorentz, mu$1]]*
7280      Z[Index[Lorentz, mu$1]])/(sw*vev) +
7281    (cT*ee*G0*H*sw*del[H, Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7282     (cw*vev) - (cA*ee^3*G0*vev^2*del[H, Index[Lorentz, mu$1]]*
7283      Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw) +
7284    (cA*cw*ee^3*G0*vev^2*del[H, Index[Lorentz, mu$1]]*
7285      Z[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
7286    (cA*ee^3*G0*sw*vev^2*del[H, Index[Lorentz, mu$1]]*
7287      Z[Index[Lorentz, mu$1]])/(2*cw^3*MW^2) +
7288    (cA*ee^3*G0*sw*vev^2*del[H, Index[Lorentz, mu$1]]*
7289      Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7290    (cB*cw*ee^2*G0^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
7291       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(4*MW^2*sw) -
7292    (cw*cWW*ee^2*G0^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
7293       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(4*MW^2*sw) -
7294    (cB*cw*ee^2*GP*GPbar*del[del[A[Index[Lorentz, mu$1]],
7295        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7296     (2*MW^2*sw) - (cw*cWW*ee^2*GP*GPbar*del[del[A[Index[Lorentz, mu$1]],
7297        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7298     (2*MW^2*sw) + (cB*cw*ee^2*H^2*del[del[A[Index[Lorentz, mu$1]],
7299        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7300     (4*MW^2*sw) - (cw*cWW*ee^2*H^2*del[del[A[Index[Lorentz, mu$1]],
7301        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7302     (4*MW^2*sw) + (cB*ee^2*G0^2*sw*del[del[A[Index[Lorentz, mu$1]],
7303        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7304     (4*cw*MW^2) - (cWW*ee^2*G0^2*sw*del[del[A[Index[Lorentz, mu$1]],
7305        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7306     (4*cw*MW^2) + (cB*ee^2*GP*GPbar*sw*del[del[A[Index[Lorentz, mu$1]],
7307        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7308     (2*cw*MW^2) + (cWW*ee^2*GP*GPbar*sw*del[del[A[Index[Lorentz, mu$1]],
7309        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7310     (2*cw*MW^2) + (cB*ee^2*H^2*sw*del[del[A[Index[Lorentz, mu$1]],
7311        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7312     (4*cw*MW^2) - (cWW*ee^2*H^2*sw*del[del[A[Index[Lorentz, mu$1]],
7313        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7314     (4*cw*MW^2) + (cB*cw*ee^2*H*vev*del[del[A[Index[Lorentz, mu$1]],
7315        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7316     (2*MW^2*sw) - (cw*cWW*ee^2*H*vev*del[del[A[Index[Lorentz, mu$1]],
7317        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7318     (2*MW^2*sw) + (cB*ee^2*H*sw*vev*del[del[A[Index[Lorentz, mu$1]],
7319        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7320     (2*cw*MW^2) - (cWW*ee^2*H*sw*vev*del[del[A[Index[Lorentz, mu$1]],
7321        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7322     (2*cw*MW^2) + (cB*cw*ee^2*vev^2*del[del[A[Index[Lorentz, mu$1]],
7323        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7324     (4*MW^2*sw) - (cw*cWW*ee^2*vev^2*del[del[A[Index[Lorentz, mu$1]],
7325        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7326     (4*MW^2*sw) + (cB*ee^2*sw*vev^2*del[del[A[Index[Lorentz, mu$1]],
7327        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7328     (4*cw*MW^2) - (cWW*ee^2*sw*vev^2*del[del[A[Index[Lorentz, mu$1]],
7329        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7330     (4*cw*MW^2) - (cWW*ee^2*G0*GPbar*del[del[W[Index[Lorentz, mu$1]],
7331        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7332     (2*cw*MW^2) + ((I/2)*cWW*ee^2*GPbar*H*del[del[W[Index[Lorentz, mu$1]],
7333        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7334     (cw*MW^2) + ((I/2)*cWW*ee^2*GPbar*vev*del[del[W[Index[Lorentz, mu$1]],
7335        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7336     (cw*MW^2) - (cWW*ee^2*G0*GP*del[del[Wbar[Index[Lorentz, mu$1]],
7337        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7338     (2*cw*MW^2) - ((I/2)*cWW*ee^2*GP*H*del[del[Wbar[Index[Lorentz, mu$1]],
7339        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7340     (cw*MW^2) - ((I/2)*cWW*ee^2*GP*vev*del[del[Wbar[Index[Lorentz, mu$1]],
7341        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7342     (cw*MW^2) - (cB*ee^2*G0^2*del[del[Z[Index[Lorentz, mu$1]],
7343        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7344     (4*MW^2) - (cWW*ee^2*G0^2*del[del[Z[Index[Lorentz, mu$1]],
7345        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7346     (4*MW^2) + (cB*ee^2*GP*GPbar*del[del[Z[Index[Lorentz, mu$1]],
7347        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7348     (2*MW^2) + (cWW*ee^2*GP*GPbar*del[del[Z[Index[Lorentz, mu$1]],
7349        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7350     (2*MW^2) - (cB*ee^2*H^2*del[del[Z[Index[Lorentz, mu$1]],
7351        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7352     (4*MW^2) - (cWW*ee^2*H^2*del[del[Z[Index[Lorentz, mu$1]],
7353        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7354     (4*MW^2) - (cw^2*cWW*ee^2*G0^2*del[del[Z[Index[Lorentz, mu$1]],
7355        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7356     (4*MW^2*sw^2) - (cw^2*cWW*ee^2*GP*GPbar*
7357      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
7358       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7359    (cw^2*cWW*ee^2*H^2*del[del[Z[Index[Lorentz, mu$1]],
7360        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7361     (4*MW^2*sw^2) - (cB*ee^2*G0^2*sw^2*del[del[Z[Index[Lorentz, mu$1]],
7362        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7363     (4*cw^2*MW^2) - (cB*ee^2*GP*GPbar*sw^2*
7364      del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
7365       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw^2*MW^2) -
7366    (cB*ee^2*H^2*sw^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
7367       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(4*cw^2*MW^2) -
7368    (cB*ee^2*H*vev*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
7369       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2) -
7370    (cWW*ee^2*H*vev*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
7371       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2) -
7372    (cw^2*cWW*ee^2*H*vev*del[del[Z[Index[Lorentz, mu$1]],
7373        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7374     (2*MW^2*sw^2) - (cB*ee^2*H*sw^2*vev*del[del[Z[Index[Lorentz, mu$1]],
7375        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7376     (2*cw^2*MW^2) - (cB*ee^2*vev^2*del[del[Z[Index[Lorentz, mu$1]],
7377        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7378     (4*MW^2) - (cWW*ee^2*vev^2*del[del[Z[Index[Lorentz, mu$1]],
7379        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7380     (4*MW^2) - (cw^2*cWW*ee^2*vev^2*del[del[Z[Index[Lorentz, mu$1]],
7381        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7382     (4*MW^2*sw^2) - (cB*ee^2*sw^2*vev^2*del[del[Z[Index[Lorentz, mu$1]],
7383        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7384     (4*cw^2*MW^2) - ((I/2)*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
7385      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7386      Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7387    (cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
7388       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7389    ((I/2)*cw*cWW*ee^3*G0*GPbar*A[Index[Lorentz, mu$1]]*
7390      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7391      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7392    (cw*cWW*ee^3*GPbar*H*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
7393       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7394    (cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
7395       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7396    (cw*cWW*ee^3*GPbar*vev*A[Index[Lorentz, mu$1]]*
7397      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7398      Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7399    (cw*cWW*ee^2*GPbar*del[G0, Index[Lorentz, mu$1]]*
7400      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7401      Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
7402    (cw*cWW*ee^2*G0*del[GPbar, Index[Lorentz, mu$1]]*
7403      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7404      Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7405    ((I/2)*cw*cWW*ee^2*H*del[GPbar, Index[Lorentz, mu$1]]*
7406      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7407      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7408    ((I/2)*cw*cWW*ee^2*vev*del[GPbar, Index[Lorentz, mu$1]]*
7409      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7410      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7411    ((I/2)*cw*cWW*ee^2*GPbar*del[H, Index[Lorentz, mu$1]]*
7412      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7413      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7414    ((2*I)*c2W*cw*ee*del[del[Wbar[Index[Lorentz, mu$1]],
7415        Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7416      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
7417      Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
7418    ((I/2)*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
7419      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7420      Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7421    (cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
7422       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
7423    ((I/2)*cw*cWW*ee^3*G0*GP*A[Index[Lorentz, mu$1]]*
7424      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7425      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7426    (cw*cWW*ee^3*GP*H*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
7427       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7428    (cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*del[Wbar[Index[Lorentz, mu$2]],
7429       Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7430    (cw*cWW*ee^3*GP*vev*A[Index[Lorentz, mu$1]]*
7431      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7432      Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7433    (cw*cWW*ee^2*GP*del[G0, Index[Lorentz, mu$1]]*
7434      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7435      Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
7436    (cw*cWW*ee^2*G0*del[GP, Index[Lorentz, mu$1]]*
7437      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7438      Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
7439    ((I/2)*cw*cWW*ee^2*H*del[GP, Index[Lorentz, mu$1]]*
7440      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7441      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7442    ((I/2)*cw*cWW*ee^2*vev*del[GP, Index[Lorentz, mu$1]]*
7443      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7444      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7445    ((I/2)*cw*cWW*ee^2*GP*del[H, Index[Lorentz, mu$1]]*
7446      del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$2]]*
7447      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7448    ((2*I)*c2W*cw*ee*del[del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
7449       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
7450       Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
7451    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[W[Index[Lorentz, mu$2]],
7452       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
7453       Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
7454    (I*cw*ee*ghWmbar . del[ghWm, Index[Lorentz, mu$1]]*
7455      Z[Index[Lorentz, mu$1]])/sw -
7456    (I*cA*ee^3*vev^2*ghWmbar . del[ghWm, Index[Lorentz, mu$1]]*
7457      Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
7458    (I*cA*cw*ee^3*vev^2*ghWmbar . del[ghWm, Index[Lorentz, mu$1]]*
7459      Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
7460    ((2*I)*cA*ee^3*sw*vev^2*ghWmbar . del[ghWm, Index[Lorentz, mu$1]]*
7461      Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7462    (I*cw*ee*ghWpbar . del[ghWp, Index[Lorentz, mu$1]]*
7463      Z[Index[Lorentz, mu$1]])/sw +
7464    (I*cA*ee^3*vev^2*ghWpbar . del[ghWp, Index[Lorentz, mu$1]]*
7465      Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7466    (I*cA*cw*ee^3*vev^2*ghWpbar . del[ghWp, Index[Lorentz, mu$1]]*
7467      Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
7468    ((2*I)*cA*ee^3*sw*vev^2*ghWpbar . del[ghWp, Index[Lorentz, mu$1]]*
7469      Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7470    (ee^2*G0*GPbar*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/(2*cw) -
7471    (cT*ee^2*G0*GPbar*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7472     (2*cw) - ((I/2)*ee^2*GPbar*H*W[Index[Lorentz, mu$1]]*
7473      Z[Index[Lorentz, mu$1]])/cw +
7474    ((I/4)*cH*ee^2*GPbar*H*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7475     cw + (((3*I)/2)*cT*ee^2*GPbar*H*W[Index[Lorentz, mu$1]]*
7476      Z[Index[Lorentz, mu$1]])/cw -
7477    (cT*cw*ee^2*G0*GPbar*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7478     (2*sw^2) + (((3*I)/2)*cT*cw*ee^2*GPbar*H*W[Index[Lorentz, mu$1]]*
7479      Z[Index[Lorentz, mu$1]])/sw^2 -
7480    (cT*ee^2*G0^3*GPbar*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7481     (2*cw*vev^2) - (cT*ee^2*G0*GP*GPbar^2*W[Index[Lorentz, mu$1]]*
7482      Z[Index[Lorentz, mu$1]])/(cw*vev^2) +
7483    ((I/2)*cT*ee^2*G0^2*GPbar*H*W[Index[Lorentz, mu$1]]*
7484      Z[Index[Lorentz, mu$1]])/(cw*vev^2) +
7485    (I*cT*ee^2*GP*GPbar^2*H*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7486     (cw*vev^2) - (cT*ee^2*G0*GPbar*H^2*W[Index[Lorentz, mu$1]]*
7487      Z[Index[Lorentz, mu$1]])/(2*cw*vev^2) +
7488    ((I/2)*cT*ee^2*GPbar*H^3*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7489     (cw*vev^2) - (cT*cw*ee^2*G0^3*GPbar*W[Index[Lorentz, mu$1]]*
7490      Z[Index[Lorentz, mu$1]])/(2*sw^2*vev^2) +
7491    (cT*cw*ee^2*G0*GP*GPbar^2*W[Index[Lorentz, mu$1]]*
7492      Z[Index[Lorentz, mu$1]])/(sw^2*vev^2) +
7493    ((I/2)*cT*cw*ee^2*G0^2*GPbar*H*W[Index[Lorentz, mu$1]]*
7494      Z[Index[Lorentz, mu$1]])/(sw^2*vev^2) -
7495    (I*cT*cw*ee^2*GP*GPbar^2*H*W[Index[Lorentz, mu$1]]*
7496      Z[Index[Lorentz, mu$1]])/(sw^2*vev^2) -
7497    (cT*cw*ee^2*G0*GPbar*H^2*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7498     (2*sw^2*vev^2) + ((I/2)*cT*cw*ee^2*GPbar*H^3*W[Index[Lorentz, mu$1]]*
7499      Z[Index[Lorentz, mu$1]])/(sw^2*vev^2) +
7500    ((I/2)*cT*ee^2*G0^2*GPbar*W[Index[Lorentz, mu$1]]*
7501      Z[Index[Lorentz, mu$1]])/(cw*vev) +
7502    (I*cT*ee^2*GP*GPbar^2*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7503     (cw*vev) - (cT*ee^2*G0*GPbar*H*W[Index[Lorentz, mu$1]]*
7504      Z[Index[Lorentz, mu$1]])/(cw*vev) +
7505    (((3*I)/2)*cT*ee^2*GPbar*H^2*W[Index[Lorentz, mu$1]]*
7506      Z[Index[Lorentz, mu$1]])/(cw*vev) +
7507    ((I/2)*cT*cw*ee^2*G0^2*GPbar*W[Index[Lorentz, mu$1]]*
7508      Z[Index[Lorentz, mu$1]])/(sw^2*vev) -
7509    (I*cT*cw*ee^2*GP*GPbar^2*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7510     (sw^2*vev) - (cT*cw*ee^2*G0*GPbar*H*W[Index[Lorentz, mu$1]]*
7511      Z[Index[Lorentz, mu$1]])/(sw^2*vev) +
7512    (((3*I)/2)*cT*cw*ee^2*GPbar*H^2*W[Index[Lorentz, mu$1]]*
7513      Z[Index[Lorentz, mu$1]])/(sw^2*vev) -
7514    ((I/2)*ee^2*GPbar*vev*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7515     cw + ((I/2)*cT*ee^2*GPbar*vev*W[Index[Lorentz, mu$1]]*
7516      Z[Index[Lorentz, mu$1]])/cw + ((I/2)*cT*cw*ee^2*GPbar*vev*
7517      W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/sw^2 +
7518    (cA*ee^4*G0*GPbar*vev^2*W[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7519     (2*cw^3*MW^2) + (cA*ee^4*G0*GPbar*vev^2*W[Index[Lorentz, mu$1]]*
7520      Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
7521    ((I/2)*cA*ee^4*GPbar*H*vev^2*W[Index[Lorentz, mu$1]]*
7522      Z[Index[Lorentz, mu$1]])/(cw^3*MW^2) -
7523    ((I/2)*cA*ee^4*GPbar*H*vev^2*W[Index[Lorentz, mu$1]]*
7524      Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7525    ((I/2)*cA*ee^4*GPbar*vev^3*W[Index[Lorentz, mu$1]]*
7526      Z[Index[Lorentz, mu$1]])/(cw^3*MW^2) -
7527    ((I/2)*cA*ee^4*GPbar*vev^3*W[Index[Lorentz, mu$1]]*
7528      Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7529    (cWW*ee^4*G0*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7530      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7531    ((I/2)*cWW*ee^4*GPbar*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7532      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7533    (cw*cWW*ee^4*G0*GPbar*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7534      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7535    ((I/2)*cw*cWW*ee^4*GPbar*H*A[Index[Lorentz, mu$1]]*
7536      A[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7537      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7538    ((I/2)*cWW*ee^4*GPbar*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7539      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7540    ((I/2)*cw*cWW*ee^4*GPbar*vev*A[Index[Lorentz, mu$1]]*
7541      A[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7542      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7543    ((I/2)*cHW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*
7544      del[G0, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7545      Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7546    (((3*I)/2)*cHW*cw*ee^3*GPbar*A[Index[Lorentz, mu$1]]*
7547      del[G0, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7548      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7549    (I*cw*cWW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*
7550      del[G0, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7551      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7552    ((I/2)*cHW*ee^3*G0*A[Index[Lorentz, mu$1]]*
7553      del[GPbar, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7554      Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7555    (cHW*ee^3*H*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
7556      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7557    ((I/2)*cHW*cw*ee^3*G0*A[Index[Lorentz, mu$1]]*
7558      del[GPbar, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7559      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7560    (I*cw*cWW*ee^3*G0*A[Index[Lorentz, mu$1]]*
7561      del[GPbar, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7562      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7563    (cHW*cw*ee^3*H*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
7564      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
7565    (cw*cWW*ee^3*H*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
7566      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7567    (cHW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
7568      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7569    (cHW*cw*ee^3*vev*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
7570      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
7571    (cw*cWW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[GPbar, Index[Lorentz, mu$2]]*
7572      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7573    (cHW*cw*ee^2*del[G0, Index[Lorentz, mu$1]]*
7574      del[GPbar, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7575      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7576    (cHW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
7577      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
7578    (3*cHW*cw*ee^3*GPbar*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
7579      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7580    (cw*cWW*ee^3*GPbar*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
7581      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7582    (I*cHW*cw*ee^2*del[GPbar, Index[Lorentz, mu$1]]*
7583      del[H, Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*
7584      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7585    ((I/2)*cHW*ee^3*G0*GPbar*del[A[Index[Lorentz, mu$1]],
7586       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7587     (cw*MW^2) - (I*cWW*ee^3*G0*GPbar*del[A[Index[Lorentz, mu$1]],
7588       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7589     (cw*MW^2) - (cHW*ee^3*GPbar*H*del[A[Index[Lorentz, mu$1]],
7590       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7591     (2*cw*MW^2) - (cWW*ee^3*GPbar*H*del[A[Index[Lorentz, mu$1]],
7592       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7593     (cw*MW^2) + ((I/2)*cHB*cw*ee^3*G0*GPbar*del[A[Index[Lorentz, mu$1]],
7594       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7595     (MW^2*sw^2) + (cHB*cw*ee^3*GPbar*H*del[A[Index[Lorentz, mu$1]],
7596       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7597     (2*MW^2*sw^2) - (cHW*ee^3*GPbar*vev*del[A[Index[Lorentz, mu$1]],
7598       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7599     (2*cw*MW^2) - (cWW*ee^3*GPbar*vev*del[A[Index[Lorentz, mu$1]],
7600       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7601     (cw*MW^2) + (cHB*cw*ee^3*GPbar*vev*del[A[Index[Lorentz, mu$1]],
7602       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7603     (2*MW^2*sw^2) - (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*
7604      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]],
7605       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7606     (MW^2*sw) + ((I/4)*cHW*cw*ee^3*G0^2*del[Wbar[Index[Lorentz, mu$1]],
7607       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7608     (MW^2*sw^3) + (((3*I)/4)*cw*cWW*ee^3*G0^2*
7609      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7610      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7611    ((I/2)*cHW*cw*ee^3*GP*GPbar*del[Wbar[Index[Lorentz, mu$1]],
7612       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7613     (MW^2*sw^3) + (((3*I)/2)*cw*cWW*ee^3*GP*GPbar*
7614      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7615      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7616    ((I/4)*cHW*cw*ee^3*H^2*del[Wbar[Index[Lorentz, mu$1]],
7617       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7618     (MW^2*sw^3) + (((3*I)/4)*cw*cWW*ee^3*H^2*del[Wbar[Index[Lorentz, mu$1]],
7619       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7620     (MW^2*sw^3) - (I*cw*ee*del[Wbar[Index[Lorentz, mu$1]],
7621       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7622     sw + ((I/4)*cHW*ee^3*G0^2*del[Wbar[Index[Lorentz, mu$1]],
7623       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7624     (cw*MW^2*sw) + ((I/2)*cWW*ee^3*G0^2*del[Wbar[Index[Lorentz, mu$1]],
7625       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7626     (cw*MW^2*sw) - ((I/2)*cHW*ee^3*GP*GPbar*del[Wbar[Index[Lorentz, mu$1]],
7627       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7628     (cw*MW^2*sw) - (I*cWW*ee^3*GP*GPbar*del[Wbar[Index[Lorentz, mu$1]],
7629       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7630     (cw*MW^2*sw) + ((I/4)*cHW*ee^3*H^2*del[Wbar[Index[Lorentz, mu$1]],
7631       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7632     (cw*MW^2*sw) + ((I/2)*cWW*ee^3*H^2*del[Wbar[Index[Lorentz, mu$1]],
7633       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7634     (cw*MW^2*sw) + ((I/2)*cHW*cw*ee^3*H*vev*del[Wbar[Index[Lorentz, mu$1]],
7635       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7636     (MW^2*sw^3) + (((3*I)/2)*cw*cWW*ee^3*H*vev*
7637      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7638      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7639    ((I/2)*cHW*ee^3*H*vev*del[Wbar[Index[Lorentz, mu$1]],
7640       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7641     (cw*MW^2*sw) + (I*cWW*ee^3*H*vev*del[Wbar[Index[Lorentz, mu$1]],
7642       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7643     (cw*MW^2*sw) + ((I/4)*cHW*cw*ee^3*vev^2*del[Wbar[Index[Lorentz, mu$1]],
7644       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7645     (MW^2*sw^3) + (((3*I)/4)*cw*cWW*ee^3*vev^2*
7646      del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7647      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7648    (I*cA*ee^3*vev^2*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7649      W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
7650    ((I/4)*cHW*ee^3*vev^2*del[Wbar[Index[Lorentz, mu$1]],
7651       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7652     (cw*MW^2*sw) + (I*cA*cw*ee^3*vev^2*del[Wbar[Index[Lorentz, mu$1]],
7653       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7654     (MW^2*sw) + ((I/2)*cWW*ee^3*vev^2*del[Wbar[Index[Lorentz, mu$1]],
7655       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7656     (cw*MW^2*sw) + ((2*I)*cA*ee^3*sw*vev^2*del[Wbar[Index[Lorentz, mu$1]],
7657       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7658     (cw*MW^2) + (4*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]],
7659       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
7660       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7661     (MW^2*sw) - ((I/2)*cHB*ee^3*G0*GPbar*del[Z[Index[Lorentz, mu$1]],
7662       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7663     (MW^2*sw) - ((I/2)*cHW*ee^3*G0*GPbar*del[Z[Index[Lorentz, mu$1]],
7664       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7665     (MW^2*sw) - (I*cWW*ee^3*G0*GPbar*del[Z[Index[Lorentz, mu$1]],
7666       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7667     (MW^2*sw) - (cHB*ee^3*GPbar*H*del[Z[Index[Lorentz, mu$1]],
7668       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7669     (2*MW^2*sw) - (cHW*ee^3*GPbar*H*del[Z[Index[Lorentz, mu$1]],
7670       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7671     (2*MW^2*sw) - (cWW*ee^3*GPbar*H*del[Z[Index[Lorentz, mu$1]],
7672       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7673     (MW^2*sw) - (cHB*ee^3*GPbar*vev*del[Z[Index[Lorentz, mu$1]],
7674       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7675     (2*MW^2*sw) - (cHW*ee^3*GPbar*vev*del[Z[Index[Lorentz, mu$1]],
7676       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7677     (2*MW^2*sw) - (cWW*ee^3*GPbar*vev*del[Z[Index[Lorentz, mu$1]],
7678       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7679     (MW^2*sw) - (2*c2W*cw^2*ee^2*del[Wbar[Index[Lorentz, mu$1]],
7680       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
7681       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/
7682     (MW^2*sw^2) + (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*
7683      del[del[Wbar[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]],
7684       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/
7685     (MW^2*sw) + ((2*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*
7686      A[Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$2]],
7687       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/
7688     (MW^2*sw) + (6*c3W*cw*ee^4*del[A[Index[Lorentz, mu$1]],
7689       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$2]],
7690       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/
7691     (MW^2*sw^3) - ((4*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*
7692      A[Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
7693       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/
7694     (MW^2*sw) - (6*c3W*cw*ee^4*del[A[Index[Lorentz, mu$1]],
7695       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
7696       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/
7697     (MW^2*sw^3) - (6*c3W*cw^2*ee^4*del[Wbar[Index[Lorentz, mu$1]],
7698       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
7699       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/
7700     (MW^2*sw^4) + (4*c2W*cw^2*ee^2*del[Wbar[Index[Lorentz, mu$1]],
7701       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$2]],
7702       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/
7703     (MW^2*sw^2) + (6*c3W*cw^2*ee^4*del[Wbar[Index[Lorentz, mu$1]],
7704       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
7705       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/
7706     (MW^2*sw^4) - (2*c2W*cw^2*ee^2*del[Wbar[Index[Lorentz, mu$1]],
7707       Index[Lorentz, mu$2]]*del[Z[Index[Lorentz, mu$3]],
7708       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/
7709     (MW^2*sw^2) + (2*cw*ee^4*tc3W*del[A[Index[Lorentz, mu$1]],
7710       Index[Lorentz, mu$2]]*del[Wbar[Index[Lorentz, mu$3]],
7711       Index[Lorentz, mu$4]]*Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3],
7712       Index[Lorentz, mu$4], Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*
7713      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7714    (2*cw^2*ee^4*tc3W*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7715      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$4]]*
7716      Eps[Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4],
7717       Index[Lorentz, mu$5]]*W[Index[Lorentz, mu$5]]*Z[Index[Lorentz, mu$1]])/
7718     (MW^2*sw^4) + (ee^2*G0*GP*Wbar[Index[Lorentz, mu$1]]*
7719      Z[Index[Lorentz, mu$1]])/(2*cw) -
7720    (cT*ee^2*G0*GP*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7721     (2*cw) + ((I/2)*ee^2*GP*H*Wbar[Index[Lorentz, mu$1]]*
7722      Z[Index[Lorentz, mu$1]])/cw -
7723    ((I/4)*cH*ee^2*GP*H*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7724     cw - (((3*I)/2)*cT*ee^2*GP*H*Wbar[Index[Lorentz, mu$1]]*
7725      Z[Index[Lorentz, mu$1]])/cw -
7726    (cT*cw*ee^2*G0*GP*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7727     (2*sw^2) - (((3*I)/2)*cT*cw*ee^2*GP*H*Wbar[Index[Lorentz, mu$1]]*
7728      Z[Index[Lorentz, mu$1]])/sw^2 -
7729    (cT*ee^2*G0^3*GP*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7730     (2*cw*vev^2) - (cT*ee^2*G0*GP^2*GPbar*Wbar[Index[Lorentz, mu$1]]*
7731      Z[Index[Lorentz, mu$1]])/(cw*vev^2) -
7732    ((I/2)*cT*ee^2*G0^2*GP*H*Wbar[Index[Lorentz, mu$1]]*
7733      Z[Index[Lorentz, mu$1]])/(cw*vev^2) -
7734    (I*cT*ee^2*GP^2*GPbar*H*Wbar[Index[Lorentz, mu$1]]*
7735      Z[Index[Lorentz, mu$1]])/(cw*vev^2) -
7736    (cT*ee^2*G0*GP*H^2*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7737     (2*cw*vev^2) - ((I/2)*cT*ee^2*GP*H^3*Wbar[Index[Lorentz, mu$1]]*
7738      Z[Index[Lorentz, mu$1]])/(cw*vev^2) -
7739    (cT*cw*ee^2*G0^3*GP*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7740     (2*sw^2*vev^2) + (cT*cw*ee^2*G0*GP^2*GPbar*Wbar[Index[Lorentz, mu$1]]*
7741      Z[Index[Lorentz, mu$1]])/(sw^2*vev^2) -
7742    ((I/2)*cT*cw*ee^2*G0^2*GP*H*Wbar[Index[Lorentz, mu$1]]*
7743      Z[Index[Lorentz, mu$1]])/(sw^2*vev^2) +
7744    (I*cT*cw*ee^2*GP^2*GPbar*H*Wbar[Index[Lorentz, mu$1]]*
7745      Z[Index[Lorentz, mu$1]])/(sw^2*vev^2) -
7746    (cT*cw*ee^2*G0*GP*H^2*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7747     (2*sw^2*vev^2) - ((I/2)*cT*cw*ee^2*GP*H^3*Wbar[Index[Lorentz, mu$1]]*
7748      Z[Index[Lorentz, mu$1]])/(sw^2*vev^2) -
7749    ((I/2)*cT*ee^2*G0^2*GP*Wbar[Index[Lorentz, mu$1]]*
7750      Z[Index[Lorentz, mu$1]])/(cw*vev) -
7751    (I*cT*ee^2*GP^2*GPbar*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7752     (cw*vev) - (cT*ee^2*G0*GP*H*Wbar[Index[Lorentz, mu$1]]*
7753      Z[Index[Lorentz, mu$1]])/(cw*vev) -
7754    (((3*I)/2)*cT*ee^2*GP*H^2*Wbar[Index[Lorentz, mu$1]]*
7755      Z[Index[Lorentz, mu$1]])/(cw*vev) -
7756    ((I/2)*cT*cw*ee^2*G0^2*GP*Wbar[Index[Lorentz, mu$1]]*
7757      Z[Index[Lorentz, mu$1]])/(sw^2*vev) +
7758    (I*cT*cw*ee^2*GP^2*GPbar*Wbar[Index[Lorentz, mu$1]]*
7759      Z[Index[Lorentz, mu$1]])/(sw^2*vev) -
7760    (cT*cw*ee^2*G0*GP*H*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7761     (sw^2*vev) - (((3*I)/2)*cT*cw*ee^2*GP*H^2*Wbar[Index[Lorentz, mu$1]]*
7762      Z[Index[Lorentz, mu$1]])/(sw^2*vev) +
7763    ((I/2)*ee^2*GP*vev*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7764     cw - ((I/2)*cT*ee^2*GP*vev*Wbar[Index[Lorentz, mu$1]]*
7765      Z[Index[Lorentz, mu$1]])/cw - ((I/2)*cT*cw*ee^2*GP*vev*
7766      Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/sw^2 +
7767    (cA*ee^4*G0*GP*vev^2*Wbar[Index[Lorentz, mu$1]]*Z[Index[Lorentz, mu$1]])/
7768     (2*cw^3*MW^2) + (cA*ee^4*G0*GP*vev^2*Wbar[Index[Lorentz, mu$1]]*
7769      Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7770    ((I/2)*cA*ee^4*GP*H*vev^2*Wbar[Index[Lorentz, mu$1]]*
7771      Z[Index[Lorentz, mu$1]])/(cw^3*MW^2) +
7772    ((I/2)*cA*ee^4*GP*H*vev^2*Wbar[Index[Lorentz, mu$1]]*
7773      Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7774    ((I/2)*cA*ee^4*GP*vev^3*Wbar[Index[Lorentz, mu$1]]*
7775      Z[Index[Lorentz, mu$1]])/(cw^3*MW^2) +
7776    ((I/2)*cA*ee^4*GP*vev^3*Wbar[Index[Lorentz, mu$1]]*
7777      Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7778    (cHW*ee^4*G0*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7779      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
7780    (cWW*ee^4*G0*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7781      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
7782    ((I/2)*cHW*ee^4*GP*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7783      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7784    ((I/2)*cWW*ee^4*GP*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7785      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7786    (cHW*cw*ee^4*G0*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7787      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
7788    (cw*cWW*ee^4*G0*GP*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7789      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7790    ((I/2)*cHW*cw*ee^4*GP*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7791      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7792    ((I/2)*cw*cWW*ee^4*GP*H*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7793      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7794    ((I/2)*cHW*ee^4*GP*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7795      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7796    ((I/2)*cWW*ee^4*GP*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7797      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7798    ((I/2)*cHW*cw*ee^4*GP*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7799      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7800    ((I/2)*cw*cWW*ee^4*GP*vev*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
7801      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7802    ((I/2)*cHW*ee^3*GP*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
7803      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7804    (((3*I)/2)*cHW*cw*ee^3*GP*A[Index[Lorentz, mu$1]]*
7805      del[G0, Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7806      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7807    (I*cw*cWW*ee^3*GP*A[Index[Lorentz, mu$1]]*del[G0, Index[Lorentz, mu$2]]*
7808      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7809    ((I/2)*cHW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
7810      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7811    (cHW*ee^3*H*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
7812      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
7813    ((I/2)*cHW*cw*ee^3*G0*A[Index[Lorentz, mu$1]]*
7814      del[GP, Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7815      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7816    (I*cw*cWW*ee^3*G0*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
7817      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7818    (cHW*cw*ee^3*H*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
7819      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
7820    (cw*cWW*ee^3*H*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
7821      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7822    (cHW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
7823      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) +
7824    (cHW*cw*ee^3*vev*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
7825      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) +
7826    (cw*cWW*ee^3*vev*A[Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
7827      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7828    (cHW*cw*ee^2*del[G0, Index[Lorentz, mu$1]]*del[GP, Index[Lorentz, mu$2]]*
7829      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7830    (cHW*ee^3*GP*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
7831      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
7832    (3*cHW*cw*ee^3*GP*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
7833      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7834    (cw*cWW*ee^3*GP*A[Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
7835      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
7836    (I*cHW*cw*ee^2*del[GP, Index[Lorentz, mu$1]]*del[H, Index[Lorentz, mu$2]]*
7837      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7838    ((I/2)*cHW*ee^3*G0*GP*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7839      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7840    (I*cWW*ee^3*G0*GP*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7841      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7842    (cHW*ee^3*GP*H*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7843      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
7844    (cWW*ee^3*GP*H*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7845      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) -
7846    ((I/2)*cHB*cw*ee^3*G0*GP*del[A[Index[Lorentz, mu$1]],
7847       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7848      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7849    (cHB*cw*ee^3*GP*H*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7850      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7851    (cHW*ee^3*GP*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7852      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2) -
7853    (cWW*ee^3*GP*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7854      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7855    (cHB*cw*ee^3*GP*vev*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7856      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^2) -
7857    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[del[W[Index[Lorentz, mu$2]],
7858        Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
7859      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
7860    ((I/4)*cHW*cw*ee^3*G0^2*del[W[Index[Lorentz, mu$1]],
7861       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7862      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7863    (((3*I)/4)*cw*cWW*ee^3*G0^2*del[W[Index[Lorentz, mu$1]],
7864       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7865      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7866    ((I/2)*cHW*cw*ee^3*GP*GPbar*del[W[Index[Lorentz, mu$1]],
7867       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7868      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7869    (((3*I)/2)*cw*cWW*ee^3*GP*GPbar*del[W[Index[Lorentz, mu$1]],
7870       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7871      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7872    ((I/4)*cHW*cw*ee^3*H^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7873      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7874    (((3*I)/4)*cw*cWW*ee^3*H^2*del[W[Index[Lorentz, mu$1]],
7875       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7876      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7877    (I*cw*ee*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7878      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/sw -
7879    ((I/4)*cHW*ee^3*G0^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7880      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7881    ((I/2)*cWW*ee^3*G0^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7882      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
7883    ((I/2)*cHW*ee^3*GP*GPbar*del[W[Index[Lorentz, mu$1]],
7884       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7885      Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
7886    (I*cWW*ee^3*GP*GPbar*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7887      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7888    ((I/4)*cHW*ee^3*H^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7889      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7890    ((I/2)*cWW*ee^3*H^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7891      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7892    ((I/2)*cHW*cw*ee^3*H*vev*del[W[Index[Lorentz, mu$1]],
7893       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7894      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7895    (((3*I)/2)*cw*cWW*ee^3*H*vev*del[W[Index[Lorentz, mu$1]],
7896       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7897      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7898    ((I/2)*cHW*ee^3*H*vev*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7899      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7900    (I*cWW*ee^3*H*vev*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7901      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7902    ((I/4)*cHW*cw*ee^3*vev^2*del[W[Index[Lorentz, mu$1]],
7903       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7904      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
7905    (((3*I)/4)*cw*cWW*ee^3*vev^2*del[W[Index[Lorentz, mu$1]],
7906       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7907      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7908    (I*cA*ee^3*vev^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7909      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7910    ((I/4)*cHW*ee^3*vev^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7911      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7912    (I*cA*cw*ee^3*vev^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7913      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
7914    ((I/2)*cWW*ee^3*vev^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7915      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7916    ((2*I)*cA*ee^3*sw*vev^2*del[W[Index[Lorentz, mu$1]],
7917       Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7918      Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7919    (4*c2W*cw*ee^2*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7920      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
7921      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
7922    ((I/2)*cHB*ee^3*G0*GP*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7923      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
7924    ((I/2)*cHW*ee^3*G0*GP*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7925      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
7926    (I*cWW*ee^3*G0*GP*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7927      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
7928    (cHB*ee^3*GP*H*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7929      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
7930    (cHW*ee^3*GP*H*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7931      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
7932    (cWW*ee^3*GP*H*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7933      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
7934    (cHB*ee^3*GP*vev*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7935      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
7936    (cHW*ee^3*GP*vev*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7937      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw) -
7938    (cWW*ee^3*GP*vev*del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7939      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
7940    (2*c2W*cw^2*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
7941      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$3]]*
7942      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
7943    (cHW*cw*ee^4*G0^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7944      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) +
7945    (3*cw*cWW*ee^4*G0^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7946      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) +
7947    (3*cHW*cw*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7948      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7949    (5*cw*cWW*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7950      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7951    (cHW*cw*ee^4*H^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7952      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) +
7953    (3*cw*cWW*ee^4*H^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7954      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) -
7955    (2*cw*ee^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7956      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/sw +
7957    (cHW*ee^4*G0^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7958      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw) +
7959    (cWW*ee^4*G0^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7960      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw) -
7961    (cHW*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7962      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) -
7963    (cWW*ee^4*GP*GPbar*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7964      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
7965    (cHW*ee^4*H^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7966      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw) +
7967    (cWW*ee^4*H^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7968      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw) +
7969    (cHW*cw*ee^4*H*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7970      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7971    (3*cw*cWW*ee^4*H*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7972      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7973    (cHW*ee^4*H*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7974      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
7975    (cWW*ee^4*H*vev*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7976      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
7977    (cHW*cw*ee^4*vev^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7978      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) +
7979    (3*cw*cWW*ee^4*vev^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7980      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*MW^2*sw^3) -
7981    (2*cA*ee^4*vev^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7982      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw) +
7983    (cHW*ee^4*vev^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7984      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw) +
7985    (cWW*ee^4*vev^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7986      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw) +
7987    (4*cA*ee^4*sw*vev^2*A[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7988      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2) +
7989    (cHW*cw*ee^3*H*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7990      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7991    (cw*cWW*ee^3*H*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7992      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7993    (cHW*cw*ee^3*vev*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7994      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7995    (cw*cWW*ee^3*vev*del[G0, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
7996      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
7997    (I*cHW*cw*ee^3*GPbar*del[GP, Index[Lorentz, mu$1]]*
7998      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
7999      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
8000    (I*cw*cWW*ee^3*GPbar*del[GP, Index[Lorentz, mu$1]]*
8001      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
8002      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
8003    (I*cHW*cw*ee^3*GP*del[GPbar, Index[Lorentz, mu$1]]*
8004      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
8005      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
8006    (I*cw*cWW*ee^3*GP*del[GPbar, Index[Lorentz, mu$1]]*
8007      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
8008      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
8009    (cHW*cw*ee^3*G0*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
8010      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
8011    (cw*cWW*ee^3*G0*del[H, Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
8012      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
8013    (cHW*cw*ee^4*G0*GPbar*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
8014      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(4*MW^2*sw^4) -
8015    ((I/4)*cHW*cw*ee^4*GPbar*H*W[Index[Lorentz, mu$1]]*
8016      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
8017      Z[Index[Lorentz, mu$1]])/(MW^2*sw^4) +
8018    (cHW*ee^4*G0*GPbar*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
8019      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(4*cw*MW^2*sw^2) +
8020    (cWW*ee^4*G0*GPbar*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
8021      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw^2) -
8022    ((I/4)*cHW*ee^4*GPbar*H*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
8023      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw^2) -
8024    ((I/2)*cWW*ee^4*GPbar*H*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
8025      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw^2) -
8026    ((I/4)*cHW*cw*ee^4*GPbar*vev*W[Index[Lorentz, mu$1]]*
8027      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$2]]*
8028      Z[Index[Lorentz, mu$1]])/(MW^2*sw^4) -
8029    ((I/4)*cHW*ee^4*GPbar*vev*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
8030      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw^2) -
8031    ((I/2)*cWW*ee^4*GPbar*vev*W[Index[Lorentz, mu$1]]*W[Index[Lorentz, mu$2]]*
8032      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw^2) -
8033    (2*c2W*cw*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
8034      A[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
8035      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
8036    ((12*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
8037       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
8038      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
8039    ((12*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
8040       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$3]]*
8041      Wbar[Index[Lorentz, mu$2]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
8042    ((12*I)*c3W*cw^2*ee^5*A[Index[Lorentz, mu$1]]*
8043      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
8044      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
8045      Z[Index[Lorentz, mu$1]])/(MW^2*sw^4) -
8046    ((12*I)*c2W*cw^2*ee^3*A[Index[Lorentz, mu$1]]*
8047      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
8048      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$2]]*
8049      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
8050    ((6*I)*c3W*cw*ee^5*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8051      W[Index[Lorentz, mu$3]]^2*Wbar[Index[Lorentz, mu$2]]*
8052      Z[Index[Lorentz, mu$1]])/(MW^2*sw^5) -
8053    ((2*I)*c2W*cw*ee^3*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8054      W[Index[Lorentz, mu$3]]^2*Wbar[Index[Lorentz, mu$2]]*
8055      Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
8056    (cHW*ee^4*G0*GP*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]]^2*
8057      Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw^2) -
8058    (cWW*ee^4*G0*GP*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]]^2*
8059      Z[Index[Lorentz, mu$1]])/(2*cw*MW^2*sw^2) -
8060    ((I/2)*cHW*ee^4*GP*H*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]]^2*
8061      Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw^2) -
8062    ((I/2)*cWW*ee^4*GP*H*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]]^2*
8063      Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw^2) -
8064    ((I/2)*cHW*ee^4*GP*vev*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]]^
8065       2*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw^2) -
8066    ((I/2)*cWW*ee^4*GP*vev*W[Index[Lorentz, mu$1]]*Wbar[Index[Lorentz, mu$2]]^
8067       2*Z[Index[Lorentz, mu$1]])/(cw*MW^2*sw^2) +
8068    (4*c2W*cw*ee^2*A[Index[Lorentz, mu$1]]*del[del[W[Index[Lorentz, mu$2]],
8069        Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
8070      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
8071    ((2*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
8072      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
8073      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) +
8074    (6*c3W*cw*ee^4*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8075      del[W[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
8076      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
8077    ((4*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
8078      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
8079      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
8080    (6*c3W*cw*ee^4*del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8081      del[W[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
8082      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) -
8083    (6*c3W*cw^2*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8084      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
8085      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^4) +
8086    (4*c2W*cw^2*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8087      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
8088      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
8089    (6*c3W*cw^2*ee^4*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8090      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
8091      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^4) -
8092    (2*c2W*cw^2*ee^2*del[W[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8093      del[Z[Index[Lorentz, mu$3]], Index[Lorentz, mu$2]]*
8094      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
8095    (2*c2W*cw*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]*
8096      A[Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
8097      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
8098    ((12*I)*c3W*cw*ee^5*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
8099       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
8100      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
8101    ((12*I)*c2W*cw*ee^3*A[Index[Lorentz, mu$1]]*del[A[Index[Lorentz, mu$2]],
8102       Index[Lorentz, mu$3]]*W[Index[Lorentz, mu$2]]*
8103      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
8104    ((12*I)*c3W*cw^2*ee^5*A[Index[Lorentz, mu$1]]*
8105      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
8106      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]]*
8107      Z[Index[Lorentz, mu$1]])/(MW^2*sw^4) +
8108    ((12*I)*c2W*cw^2*ee^3*A[Index[Lorentz, mu$1]]*
8109      del[Z[Index[Lorentz, mu$2]], Index[Lorentz, mu$3]]*
8110      W[Index[Lorentz, mu$2]]*Wbar[Index[Lorentz, mu$3]]*
8111      Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) +
8112    (4*c2W*cw*ee^4*A[Index[Lorentz, mu$1]]*A[Index[Lorentz, mu$2]]^2*
8113      W[Index[Lorentz, mu$3]]*Wbar[Index[Lorentz, mu$3]]*
8114      Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
8115    (4*c2W*cw*ee^2*del[del[A[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
8116       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
8117      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw) -
8118    (4*c2W*cw^2*ee^2*del[del[Z[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]],
8119       Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
8120      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^2) -
8121    ((6*I)*c3W*cw*ee^5*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8122      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
8123      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^5) +
8124    ((10*I)*c2W*cw*ee^3*del[Wbar[Index[Lorentz, mu$1]], Index[Lorentz, mu$2]]*
8125      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$3]]*
8126      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^3) +
8127    (cw*ee^4*G0*GPbar*tcHW*Eps[Index[Lorentz, mu$1], Index[Lorentz, mu$2],
8128       Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*W[Index[Lorentz, mu$2]]*
8129      W[Index[Lorentz, mu$4]]*Wbar[Index[Lorentz, mu$3]]*
8130      Z[Index[Lorentz, mu$1]])/(8*MW^2*sw^4) -
8131    ((I/8)*cw*ee^4*GPbar*H*tcHW*Eps[Index[Lorentz, mu$1],
8132       Index[Lorentz, mu$2], Index[Lorentz, mu$3], Index[Lorentz, mu$4]]*
8133      W[Index[Lorentz, mu$2]]*W[Index[Lorentz, mu$4]]*
8134      Wbar[Index[Lorentz, mu$3]]*Z[Index[Lorentz, mu$1]])/(MW^2*sw^4) -
8135    (ee^4*G0*GPbar*tcHW*Eps[Index[Lorent