1 jones 1.1 exe clear
 2           h/file 20 geant.63.35.e.hbook
 3           h/file 21 geant.63.35.f.hbook
 4           
 5           opt utit
 6           set hcol 1
 7           exe basic_settings
 8           set *wid 3
 9           opt liny
10           opt tic
11           size 25 15
12           
13           for/file 66 positron_gc.eps
14           meta 66 -113
15           
16           1d 1000 '1*Num of e^-! + 10*Num of [g]' 35 0 35
17           1d 1001 '1*Num of e^-! + 10*Num of [g]' 35 0 35
18           
19           
20           nt/pro 1000 //lun20/200.nume+nump+10*numg nume+nump>0
21           nt/pro 1001 //lun21/200.nume+nump+10*numg nume+nump>0
22 jones 1.1 
23           set hcol 1
24           h/pl 1000
25           set hcol 2
26           h/pl 1001 s
27           
28           atitle '1*Num of electrons + 10*Num of photons' ! ! 222
29           set plci 1
30           key 25 1e4 1 'With GC' ! L
31           set plci 2
32           key 25 5e3 1 'Without GC' ! L
33           
34           close 66