histogram/file 1 ~/temp/hist/mar1.hist 8190 X
 
 exec style_2by2
 
 opt nsta
 norm=500
 histogram/plot 430
 histogram/plot 431
 histogram/plot 438
 norm 438 [norm]
 histogram/plot 1060
 histogram/plot 1061
 histogram/plot 1068
 norm 1068 [norm]
 histogram/plot 1120
 histogram/plot 1121
 histogram/plot 1128
 norm 1128 [norm]
 histogram/plot 1180
 histogram/plot 1181
 histogram/plot 1188
 norm 1188 [norm]
 
 cd //pawc
 opt utit
 set hmax 0.1
 zone 2 2
 tit 'Optimized hZ Cuts'
 
* First the Y34 plot
 opt logy
 tit 'Y?34!(DURHAM)' u
 set hcol 1303
 set htyp 235
 null 0 0.1 0 5000
 histogram/plot 438(0.0:0.1) shist
 tit '' u
 set hcol 1
 set dmod 1
 histogram/plot 431(0.0:0.1) shist
 histogram/plot 430(0.0:0.1) s
 opt liny
 null 0 1 0 1 sab
 set chhe 0.8 
 itx 0.85 0.9 'a)'
* Put caption in first hZ plot in upper left hand corner
 exec data   0.05 0.95 0.05 20 0.5
 exec signal 0.05 0.85 0.5 555 'BG'
 exec signal 0.05 0.75 0.5 235 'hZ"5#bb&^[-]!qq&^_!' 3
 
* Min(mij) plot
 opt logy
 tit 'Min(m?i!)/"R#s' u
 set hcol 1303
 set htyp 235
* null 0 0.5 0 5000
 histogram/plot 1068(0.:0.5) hist
 tit '' u
 set hcol 1
 set dmod 1
 histogram/plot 1061 shist
 histogram/plot 1060 s
 opt liny
 null 0 1 0 1 sab
 set chhe 0.8 
 itx 0.85 0.9 'b)'
 
* Max(mij) plot
 opt logy
 tit 'Max(m?i!)/"R#s' u
 set hcol 1303
 set htyp 235
* null 0.5 1.0 0 5000
 histogram/plot 1128(0.5:1.0) hist
 tit '' u
 set hcol 1
 set dmod 1
 histogram/plot 1121 shist
 histogram/plot 1120 s
 opt liny
 null 0 1 0 1 sab
 set chhe 0.8 
 itx 0.85 0.9 'c)'
 
* Max(DEjet) plot
 opt logy
 tit 'Max([D]E?jet!)/"R#s' u
 set hcol 1303
 set htyp 235
* null 0.0 0.5 0 5000
 histogram/plot 1188(0.:0.5) hist
 tit '' u
 set hcol 1
 set dmod 1
 histogram/plot 1181 shist
 histogram/plot 1180 s
 opt liny
 null 0 1 0 1 sab
 set chhe 0.8 
 itx 0.85 0.9 'd)'