← Back to branch summary

~maddevelopers/mg5amcnlo/WWW5_caching

« back to all changes in this revision

Viewing changes to users/mardelcourt/PROC_129738/PROC_129738/SubProcesses/P0_qq_qq_q_gq_q_gq/matrix5.ps

  • Committer: John Doe
  • Date: 2013-03-25 20:27:02 UTC
  • Revision ID: john.doe@gmail.com-20130325202702-5sk3t1r8h33ca4p4
first clean version

Show diffs side-by-side

added added

removed removed

Lines of Context:
users/mardelcourt/PROC_129738/PROC_129738/SubProcesses/P0_qq_qq_q_gq_q_gq/matrix5.ps
 
1
%!PS-Adobe-2.0
 
2
%%BoundingBox: -20 -20 450  450 
 
3
%%DocumentFonts: Helvetica
 
4
%%Pages:  1 
 
5
%!MadGraph
 
6
%
 
7
% Feynman Diagrams drawn by MadGraph
 
8
%
 
9
% Using FEYNMAN DRAW
 
10
% A program by David J. Summers to draw
 
11
% Feynman diagrams. (c) 1992
 
12
% Version 2.7 (c) 1993
 
13
%
 
14
% Comments and questions to 
 
15
%  D.J.Summers@uk.ac.durham
 
16
%
 
17
 
 
18
/Fnopoints 10 def 
 
19
/Fr 2.5 def 
 
20
/pi 3.14159265359 def
 
21
 
 
22
/Frmod {dup 360 div floor 360 mul sub} def
 
23
/Fsign {0 ge {1} {-1} ifelse} def
 
24
 
 
25
/Fbasis
 
26
{/Fby exch def /Fbx exch def /Fdist Fbx Fbx
 
27
mul Fby Fby mul add sqrt def /Fxl Fbx Fdist
 
28
div Fr mul def /Fyl Fby Fdist div Fr mul def
 
29
/Fxt Fby Fdist div Fr mul def /Fyt Fbx neg
 
30
Fdist div Fr mul def } def
 
31
 
 
32
/Fstraight 
 
33
{/Fshape exch def /Ftype exch def /Fy2 exch
 
34
def /Fx2 exch def /Fy1 exch def /Fx1 exch def
 
35
Fx2 Fx1 sub Fy2 Fy1 sub Fbasis /Fttype 1
 
36
Ftype 2 mod 2 mul abs sub def Ftype 0 ge
 
37
{/Fddist Fdist Fr div 2 div def /Fn Fddist round
 
38
def Ftype 1 gt {/Fn Fn Fddist Fn sub Fsign
 
39
add def} if} {/Fn Fdist Fr div 2 div round 2
 
40
mul def} ifelse Fx1 Fy1 moveto 0 1 Fnopoints
 
41
Fn mul {/Fi exch def Fshape lineto } for
 
42
stroke } def
 
43
 
 
44
/Floop
 
45
{/Fshape exch def /Fe exch def /Ftype exch
 
46
def /Fy2 exch def /Fx2 exch def /Fy1 exch def
 
47
/Fx1 exch def /Flam 1 Fe Fe mul sub 2 div Fe
 
48
div def /Fxc Fx1 Fx2 Flam Fy2 Fy1 sub mul add
 
49
add 2 div def /Fyc Fy1 Fy2 Flam Fx1 Fx2 sub
 
50
mul add add 2 div def /Frr Fx1 Fxc sub dup
 
51
mul Fy1 Fyc sub dup mul add sqrt def /Fth1
 
52
Fy1 Fyc sub Fx1 Fxc sub atan def /Fth2 Fy2
 
53
Fyc sub Fx2 Fxc sub atan def Fe 0 lt Fth2
 
54
Fth1 lt and {/Fth1 Fth1 360 sub def} if Fe 0
 
55
gt Fth2 Fth1 gt and {/Fth2 Fth2 360 sub def}
 
56
if /Fdth Fth2 Fth1 sub Fsign def /Fttype 1
 
57
Ftype 2 mod abs 2 mul sub def Ftype 0 ge
 
58
{/Fddist Fth2 Fth1 sub abs 180 div pi mul Frr
 
59
mul Fr div def /Fn Fddist round def Ftype 1
 
60
gt {/Fn Fn Fddist Fn sub Fsign add def} if}
 
61
{/Fn Fth2 Fth1 sub abs 180 div pi mul Frr mul
 
62
Fr div 2 div round 2 mul def} ifelse Fx1 Fy1
 
63
moveto 0 1 Fnopoints Fn mul {/Fi exch def
 
64
/Fth Fth1 Fth2 Fth1 sub Fi mul Fnopoints div
 
65
Fn div add Frmod def Fth sin neg Fdth mul Fth
 
66
cos Fdth mul Fbasis Fshape lineto } for
 
67
stroke } def
 
68
 
 
69
/Farrow
 
70
{ moveto Fxt Fxl sub Fyt Fyl sub
 
71
rlineto Fxl 2 mul Fxt sub Fyl 2 mul Fyt sub
 
72
rlineto Fxl 2 mul Fxt add neg Fyl 2 mul Fyt
 
73
add neg rlineto fill } def
 
74
 
 
75
/Fphoton
 
76
{{ Fx1 Fx2 Fx1 sub Fi mul Fnopoints div Fn
 
77
div Fxt Fi 360 mul Fnopoints div Frmod sin
 
78
mul Fttype mul 2 div add add Fy1 Fy2 Fy1 sub
 
79
Fi mul Fnopoints div Fn div Fyt Fi 360 mul
 
80
Fnopoints div Frmod sin mul Fttype mul 2 div
 
81
add add } Fstraight } def
 
82
 
 
83
/Fphotonr
 
84
{{ Fx1 Fx2 Fx1 sub Fi mul Fnopoints div Fn
 
85
div Fxt Fi 180 mul Fnopoints div Frmod sin
 
86
mul Fttype mul 1 div add add Fy1 Fy2 Fy1 sub
 
87
Fi mul Fnopoints div Fn div Fyt Fi 180 mul
 
88
Fnopoints div Frmod sin mul Fttype mul 1 div
 
89
add add } Fstraight } def
 
90
 
 
91
/Fphotond
 
92
{{ Fx1 Fx2 Fx1 sub Fi mul Fnopoints div Fn
 
93
div Fxt Fi 360 mul Fnopoints div Frmod sin
 
94
mul Fttype mul 2 div add add Fy1 Fy2 Fy1 sub
 
95
Fi mul Fnopoints div Fn div Fyt Fi 360 mul
 
96
Fnopoints div Frmod sin mul Fttype mul 2 div
 
97
add add } Fstraight Fx1
 
98
Fx2 add 2 div Fy1 Fy2 add 2 div Farrow} def
 
99
 
 
100
/Fphotonl
 
101
{exch dup 3 1 roll 0 ge {{ Fxc Fth cos Frr
 
102
mul Fxt Fi 180 mul Fnopoints div Frmod sin
 
103
mul Fttype mul 2 div add add Fyc Fth sin Frr
 
104
mul Fyt Fi 180 mul Fnopoints div Frmod sin
 
105
mul Fttype mul 2 div add add }} {{ Fxc Fth
 
106
cos Frr mul Fxt 1 Fi 180 mul Fnopoints div
 
107
Frmod cos sub mul Fttype mul 2 div add add
 
108
Fyc Fth sin Frr mul Fyt 1 Fi 180 mul
 
109
Fnopoints div Frmod cos sub mul Fttype mul 2
 
110
div add add }} ifelse Floop } def
 
111
 
 
112
/Fgluon
 
113
{2 sub { Fx1 Fx2 Fx1 sub Fi mul Fnopoints div
 
114
Fn div Fxt 1 Fi 180 mul Fnopoints div cos sub
 
115
mul Fttype mul Fxl Fi 180 mul Fnopoints div
 
116
sin mul add add add Fy1 Fy2 Fy1 sub Fi mul
 
117
Fnopoints div Fn div Fyt 1 Fi 180 mul
 
118
Fnopoints div cos sub mul Fttype mul Fyl Fi
 
119
180 mul Fnopoints div sin mul add add add }
 
120
Fstraight } def
 
121
 
 
122
/Fgluonr
 
123
{2 sub { Fx1 Fx2 Fx1 sub Fi mul Fnopoints div
 
124
Fn div Fxt 0 Fi 120 mul Fnopoints div cos sub
 
125
mul Fttype mul Fxl Fi 120 mul Fnopoints div
 
126
sin mul add add add Fy1 Fy2 Fy1 sub Fi mul
 
127
Fnopoints div Fn div Fyt 0 Fi 120 mul
 
128
Fnopoints div cos sub mul Fttype mul Fyl Fi
 
129
120 mul Fnopoints div sin mul add add add }
 
130
Fstraight } def
 
131
 
 
132
 
 
133
/Fgluonl
 
134
{exch 2 sub exch { Fxc Fth cos Frr mul Fxt 1
 
135
Fi 180 mul Fnopoints div cos sub mul Fttype
 
136
mul Fxl Fi 180 mul Fnopoints div sin mul add
 
137
add add Fyc Fth sin Frr mul Fyt 1 Fi 180 mul
 
138
Fnopoints div cos sub mul Fttype mul Fyl Fi
 
139
180 mul Fnopoints div sin mul add add add }
 
140
Floop} def
 
141
 
 
142
/Ffermion
 
143
{/Fy2 exch def /Fx2 exch def /Fy1 exch def
 
144
/Fx1 exch def newpath Fx2 Fx1 sub Fy2 Fy1 sub
 
145
Fbasis Fx1 Fy1 moveto Fx2 Fy2 lineto stroke Fx1
 
146
Fx2 add 2 div Fy1 Fy2 add 2 div Farrow } def
 
147
 
 
148
/Fscalar
 
149
{newpath moveto lineto stroke} def
 
150
 
 
151
/Ffermionl
 
152
{/Fe exch def /Fy2 exch def /Fx2 exch def
 
153
/Fy1 exch def /Fx1 exch def newpath /Flam 1 Fe
 
154
Fe mul sub 2 div Fe div def /Fxc Fx1 Fx2 Flam Fy2
 
155
Fy1 sub mul add add 2 div def /Fyc Fy1 Fy2
 
156
Flam Fx1 Fx2 sub mul add add 2 div def /Frr
 
157
Fx1 Fxc sub dup mul Fy1 Fyc sub dup mul add
 
158
sqrt def /Fth1 Fy1 Fyc sub Fx1 Fxc sub atan
 
159
def /Fth2 Fy2 Fyc sub Fx2 Fxc sub atan def Fe
 
160
0 lt Fth2 Fth1 lt and {/Fth1 Fth1 360 sub
 
161
def} if Fe 0 gt Fth2 Fth1 gt and {/Fth2 Fth2
 
162
360 sub def} if /Fthc Fth1 Fth2 add 2 div def
 
163
Fxc Fyc Frr Fth1 Fth2 Fe 0 gt {arcn} {arc}
 
164
ifelse stroke Fthc sin Fe 0 lt {neg} if Fthc
 
165
cos Fe 0 gt {neg} if Fbasis Fxc Fthc cos Frr
 
166
mul add Fyc Fthc sin Frr mul add Farrow } def
 
167
 
 
168
/Fscalarl
 
169
{/Fe exch def /Fy2 exch def /Fx2 exch def
 
170
/Fy1 exch def /Fx1 exch def newpath /Flam 1 Fe
 
171
Fe mul sub 2 div Fe div def /Fxc Fx1 Fx2 Flam Fy2
 
172
Fy1 sub mul add add 2 div def /Fyc Fy1 Fy2
 
173
Flam Fx1 Fx2 sub mul add add 2 div def /Frr
 
174
Fx1 Fxc sub dup mul Fy1 Fyc sub dup mul add
 
175
sqrt def /Fth1 Fy1 Fyc sub Fx1 Fxc sub atan
 
176
def /Fth2 Fy2 Fyc sub Fx2 Fxc sub atan def Fe
 
177
0 lt Fth2 Fth1 lt and {/Fth1 Fth1 360 sub
 
178
def} if Fe 0 gt Fth2 Fth1 gt and {/Fth2 Fth2
 
179
360 sub def} if /Fthc Fth1 Fth2 add 2 div def
 
180
Fxc Fyc Frr Fth1 Fth2 Fe 0 gt {arcn} {arc}
 
181
ifelse stroke } def
 
182
 
 
183
/Fblob 
 
184
{/Fshade exch def newpath Fr mul 0 360 arc gsave
 
185
1 Fshade sub setgray fill grestore stroke} def
 
186
 
 
187
/Fhiggs
 
188
{/Fy2 exch def /Fx2 exch def /Fy1 exch def
 
189
/Fx1 exch def gsave Fx1 Fx2 sub dup mul
 
190
Fy1 Fy2 sub dup mul add sqrt dup Fr div
 
191
2 div round 2 mul 1 add div /dashln exch def
 
192
[dashln dashln] 0 setdash Fx1 Fy1 moveto
 
193
Fx2 Fy2 lineto stroke grestore} def
 
194
 
 
195
 
 
196
/Fhiggsd
 
197
{/Fy2 exch def /Fx2 exch def /Fy1 exch def
 
198
/Fx1 exch def gsave Fx1 Fx2 sub dup mul
 
199
Fy1 Fy2 sub dup mul add sqrt dup Fr div
 
200
2 div round 2 mul 1 add div /dashln exch def
 
201
[dashln dashln] 0 setdash Fx1 Fy1 moveto
 
202
Fx2 Fy2 lineto stroke grestore Fx1 Fx2 add 2 div
 
203
Fy1 Fy2 add 2 div Farrow} def
 
204
 
 
205
/Fhiggsl
 
206
{/Fe exch def /Fy2 exch def /Fx2 exch def
 
207
/Fy1 exch def /Fx1 exch def /Flam gsave 1 Fe
 
208
Fe mul sub 2 div Fe div def /Fxc Fx1 Fx2 Flam
 
209
Fy2 Fy1 sub mul add add 2 div def /Fyc Fy1
 
210
Fy2 Flam Fx1 Fx2 sub mul add add 2 div def
 
211
/Frr Fx1 Fxc sub dup mul Fy1 Fyc sub dup mul
 
212
add sqrt def /Fth1 Fy1 Fyc sub Fx1 Fxc sub
 
213
atan def /Fth2 Fy2 Fyc sub Fx2 Fxc sub atan
 
214
def Fe 0 lt Fth2 Fth1 lt and {/Fth1 Fth1 360
 
215
sub def} if Fe 0 gt Fth2 Fth1 gt and {/Fth2
 
216
Fth2 360 sub def} if /Fthc Fth1 Fth2 add 2
 
217
div def Fxc Fyc Frr Fth1 Fth2 Fe 0 gt {arcn}
 
218
{arc} ifelse Fth2 Fth1 sub abs 180 div pi mul
 
219
Frr mul dup Fr div 2 div round 2 mul 1 add
 
220
div /dashln exch def [dashln dashln] 0
 
221
setdash stroke grestore} def
 
222
 
 
223
/Fghost
 
224
{/Fy2 exch def /Fx2 exch def /Fy1 exch def
 
225
/Fx1 exch def Fx2 Fx1 sub Fy2 Fy1 sub Fbasis
 
226
/Fn Fx1 Fx2 sub dup mul Fy1 Fy2 sub dup mul
 
227
add sqrt Fr div round def 0 1 Fn {/Fi exch
 
228
def Fx2 Fx1 sub Fi Fn div mul Fx1 add Fy2 Fy1
 
229
sub Fi Fn div mul Fy1 add Fr 10 div 0 360 arc
 
230
fill} for Fx1 Fx2 add 2 div Fy1 Fy2 add 2 div
 
231
Farrow } def
 
232
 
 
233
/Fghostl
 
234
{/Fe exch def /Fy2 exch def /Fx2 exch def
 
235
/Fy1 exch def /Fx1 exch def /Flam 1 Fe Fe mul
 
236
sub 2 div Fe div def /Fxc Fx1 Fx2 Flam Fy2
 
237
Fy1 sub mul add add 2 div def /Fyc Fy1 Fy2
 
238
Flam Fx1 Fx2 sub mul add add 2 div def /Frr
 
239
Fx1 Fxc sub dup mul Fy1 Fyc sub dup mul add
 
240
sqrt def /Fth1 Fy1 Fyc sub Fx1 Fxc sub atan
 
241
def /Fth2 Fy2 Fyc sub Fx2 Fxc sub atan def Fe
 
242
0 lt Fth2 Fth1 lt and {/Fth1 Fth1 360 sub
 
243
def} if Fe 0 gt Fth2 Fth1 gt and {/Fth2 Fth2
 
244
360 sub def} if /Fthc Fth1 Fth2 add 2 div def
 
245
/Fn Fth2 Fth1 sub abs 180 div pi mul Frr mul
 
246
Fr div round def 0 1 Fn {/Fi exch def Fth2
 
247
Fth1 sub Fi Fn div mul Fth1 add dup cos Frr
 
248
mul Fxc add exch sin Frr mul Fyc add Fr 10
 
249
div 0 360 arc fill} for Fthc sin Fe 0 lt
 
250
{neg} if Fthc cos Fe 0 gt {neg} if Fbasis Fxc
 
251
Fthc cos Frr mul add Fyc Fthc sin Frr mul add
 
252
Farrow } def
 
253
 
 
254
/Fproton
 
255
{/Fy2 exch def /Fx2 exch def /Fy1 exch def
 
256
/Fx1 exch def Fx2 Fx1 sub Fy2 Fy1 sub Fbasis
 
257
Fx1 Fxt 2 div add Fy1 Fyt 2 div add moveto
 
258
Fx2 Fxt 2 div add Fy2 Fyt 2 div add lineto
 
259
Fx1 Fxt 2 div sub Fy1 Fyt 2 div sub moveto
 
260
Fx2 Fxt 2 div sub Fy2 Fyt 2 div sub lineto
 
261
Fx1 Fx2 add 2 div Fxt Fxl sub add Fy1 Fy2 add
 
262
2 div Fyt Fyl sub add moveto Fx1 Fx2 add Fxl
 
263
add 2 div Fy1 Fy2 add Fyl add 2 div lineto
 
264
Fx1 Fx2 add 2 div Fxt Fxl add sub Fy1 Fy2 add
 
265
2 div Fyt Fyl add sub lineto stroke} def
 
266
 
 
267
/Fmax {2 copy lt {exch} if pop} def
 
268
/Fstart {gsave currentpoint
 
269
translate 0 0 moveto 0 rm Fr 4 mul
 
270
scalefont setfont} def
 
271
/Fsubspt {gsave currentpoint Fcharheight 5 div
 
272
sub translate 0.6 0.6 scale 0 0 moveto 0} def
 
273
/Fsupspt {gsave currentpoint Fcharheight 0.6 mul
 
274
add translate 0.6 0.6 scale 0 0 moveto 0} def
 
275
/Feend {currentpoint pop Fmax 0.6 mul
 
276
grestore currentpoint pop add Fmax} def
 
277
/Fendd {pop grestore} def
 
278
/Fshow {exch 0 moveto show currentpoint pop} def
 
279
/Fcharheight
 
280
{gsave (X) true charpath flattenpath pathbbox
 
281
3 1 roll pop sub exch pop grestore} def
 
282
 
 
283
/Foverline
 
284
{exch 0 moveto gsave dup true charpath
 
285
flattenpath pathbbox Fcharheight 10 div dup
 
286
2 div setlinewidth add dup 4
 
287
1 roll newpath moveto pop lineto stroke
 
288
grestore show currentpoint pop} def
 
289
 
 
290
/Funderline 
 
291
{exch 0 moveto gsave dup true charpath
 
292
flattenpath pathbbox pop exch Fcharheight
 
293
10 div dup 2 div setlinewidth
 
294
sub dup 3 1 roll newpath moveto lineto stroke
 
295
grestore show currentpoint pop} def
 
296
 
 
297
/rm /Times-Roman findfont def
 
298
/it /Times-Italic findfont def
 
299
/sy /Symbol findfont def
 
300
 
 
301
/wedge 
 
302
/{ /ystop exch def /xstop exch def /ystart exch def
 
303
/xstart exch def /delx xstop xstart sub def /dely 
 
304
ystop ystart sub def /dist delx dup mul dely dup 
 
305
mul add sqrt def /halfdist dist 2 div def
 
306
/angle dely delx atan def xstart ystart moveto 
 
307
angle rotate 0 halfdist rlineto dist halfdist
 
308
neg rlineto dist neg halfdist neg rlineto 
 
309
0 halfdist rlineto }def
 
310
 
 
311
/ch_photon
 
312
{/ystop exch def /xstop exch def /ystart exch def
 
313
/xstart exch def /xmid xstart xstop add 2 div def
 
314
/ymid ystart ystop add 2 div def
 
315
/dx xstop xstart sub def /dy ystop ystart sub def
 
316
/length dx dup mul dy dup mul add sqrt def
 
317
/xunit dx length div def /yunit dy length div def
 
318
/x1 xmid xunit -4.8 mul add def
 
319
/y1 ymid yunit -4.8 mul add def
 
320
/x2 xmid xunit 4.8 mul add def
 
321
/y2 ymid yunit 4.8 mul add def
 
322
/y2 ymid yunit 4.8 mul add def
 
323
xstart ystart x1 y1 1 Fphoton 
 
324
x2 y2 xstop ystop 1 Fphoton
 
325
/x1 xmid xunit -5.2 mul add def 
 
326
/y1 ymid yunit -5.2 mul add def
 
327
/x2 xmid xunit 5.2 mul add def 
 
328
/y2 ymid yunit 5.2 mul add def
 
329
gsave x1 y1 x2 y2 wedge fill grestore} def
 
330
 
 
331
/ch_higgs 
 
332
{ /ystop exch def /xstop exch def /ystart exch def
 
333
/xstart exch def 
 
334
/xmid xstart xstop add 2 div def
 
335
/ymid ystart ystop add 2 div def
 
336
/dx xstop xstart sub def /dy ystop ystart sub def
 
337
/length dx dup mul dy dup mul add sqrt def
 
338
/xunit dx length div def /yunit dy length div def
 
339
/x1 xmid xunit -4.8 mul add def 
 
340
/y1 ymid yunit -4.8 mul add def
 
341
/x2 xmid xunit 4.8 mul add def 
 
342
/y2 ymid yunit 4.8 mul add def
 
343
xstart ystart x1 y1 Fhiggs 
 
344
x2 y2 xstop ystop Fhiggs
 
345
/x1 xmid xunit -5.2 mul add def
 
346
/y1 ymid yunit -5.2 mul add def
 
347
/x2 xmid xunit 5.2 mul add def
 
348
/y2 ymid yunit 5.2 mul add def
 
349
gsave x1 y1 x2 y2 wedge fill grestore} def
 
350
% End of the header
 
351
 
 
352
%%Page:       1       1
 
353
%%PageBoundingBox:-20 -20 600 800
 
354
%%PageFonts: Helvetica
 
355
 
 
356
/Helvetica findfont 9 scalefont setfont
 
357
 50         770  moveto
 
358
 () show
 
359
 525         770  moveto
 
360
 (page 1/1) show
 
361
 260         50  moveto
 
362
 (Diagrams made by MadGraph5) show
 
363
 275.0 560 225.0 597.5 Ffermion 
 
364
 252.0  581.75 moveto 
 
365
(s~)   show
 
366
 283.0  554.0 moveto 
 
367
(6)   show
 
368
 225.0 597.5 275.0 610.0 0 Fgluon 
 
369
 244.0  606.75 moveto 
 
370
(g)   show
 
371
 283.0  612.0 moveto 
 
372
(5)   show
 
373
 225.0 597.5 175.0 635.0 Ffermion 
 
374
 202.0  619.25 moveto 
 
375
(s~)   show
 
376
 225.0 672.5 275.0 660.0 Ffermion 
 
377
 252.0  669.25 moveto 
 
378
(s)   show
 
379
 283.0  658.0 moveto 
 
380
(4)   show
 
381
 225.0 672.5 275.0 710 0 Fgluon 
 
382
 244.0  694.25 moveto 
 
383
(g)   show
 
384
 283.0  716.0 moveto 
 
385
(3)   show
 
386
 175.0 635.0 225.0 672.5 Ffermion 
 
387
 194.0  656.75 moveto 
 
388
(s)   show
 
389
 75 560 125.0 635.0 Ffermion 
 
390
 94.0  600.5 moveto 
 
391
(u)   show
 
392
 67.0  560 moveto 
 
393
(1)   show
 
394
 125.0 635.0 75 710 Ffermion 
 
395
 102.0  675.5 moveto 
 
396
(u~)   show
 
397
 67.0  710 moveto 
 
398
(2)   show
 
399
 125.0 635.0 175.0 635.0 0 Fgluon 
 
400
 148.0  638.75 moveto 
 
401
(g)   show
 
402
 115.0  534.5 moveto 
 
403
( diagram 1 )   show
 
404
 195.0  534.5 moveto 
 
405
 (QCD=4, QED=0)   show
 
406
showpage
 
407
%%trailer