* pstarjpl.kumac plots of pstar of JpL daughters in Sig Ellipse
* exec pub-plot  kumac/pstarjpl  1 1

hist/file 1 pstarjpl.hbook

set xlab 1.; set ylab 1.
set xwin .0001; set ywin .0001
maxy = 2.9
laby = 2.4
set ndvx 606

zone 3 3
max 1569 [maxy]
h/pl 1569; itx 0.05 [laby] (a) J/[y]
atit ' ' 'Entries/10 MeV/c' 222

set xval 1000
max 1570 [maxy]
h/pl 1570; itx 0.05 [laby] (b) p

max 1571 [maxy]
h/pl 1571; itx 0.05 [laby] (c) [L]
atit 'p* (GeV/c)' ' ' 000

close 1

exec makeps pstarjpl.ps
sh ps2epsi pstarjpl.ps
sh eps2eps pstarjpl.epsi pstarjpl.eps
sh /bin/rm pstarjpl.ps
sh /bin/rm pstarjpl.epsi