SET ASIZ 0.4
set pass 3.
igset lwid 6.
*set bwid 4.
*set hwid 4.
set *wid 6.
set xmgl 4.
set vsiz 0.35
set ndvy 405
opt nbox
fort/file 66 ptadep5.ps
graphics/meta 66 -111
opt logx
opt nbox
vector/create x(5)
vector/create y(5)
vector/create ex(5)
vector/create ey(5)
vector/input x 4. 9. 28. 56. 197.
vector/input y 0.4 0.05933 0.211 0.2931 0.4658
vector/input ex 5*0.
vector/input ey 0.03 0.03 0.031 0.03 0.03
vector/create x1(4)
vector/create y1(4)
vector/create ex1(4)
vector/create ey1(4)
vector/input x1 12. 40. 56. 184.
vector/input y1 -0.011 0.046 0.053 0.106
vector/input ex1 4*0.
vector/input ey1 0.015 0.012 0.012 0.016
vector/create x2(5)
vector/create y2(5)
vector/create ex2(5)
vector/create ey2(5)
vector/input x2 4. 12. 40. 56. 184.
vector/input y2 0.30 0.141 0.20 0.315 0.41
vector/input ex2 5*0.
vector/input ey2 0.03 0.078 0.041 0.039 0.078
null 2. 1000. -0.1 0.7
text 0.8 0.3 '"<2>#"L#P?T!&^2!"G#> ((GeV/c)^2!)' 0.6 90. c
text 40.0 -0.18 'MASS NUMBER' 0.5 0. c
*text 10.0 0.64 'E772/E866' 0.55 0. c
*arrow 9. 9. 0.065 0.02
*line 0. 1. 4. 1.
func/plot 0.133*((x/2.)**(1./3.)-1.) 1. 500. s
text 5. 0.5 '0.133((A/2)^1/3!-1)' 0.5 0.
arrow 100. 125. 0.48 0.40
set hcol 2
set plci 2
set pmci 2
set txci 2
graphic/hplot/errors x y ex ey 5 20 0.3
*func/plot 1.651+0.1057*x**(1./3.) 1. 500. s
text 6.0 0.385 ' J/[Y]' 0.55 0. 
text 20.0 0.62 'PRELIMINARY' 0.65 0. c
set hcol 4
set plci 4
set pmci 4
set txci 4
graphic/hplot/errors x1 y1 ex1 ey1 4 21 0.3
func/plot 0.027*((x/2.)**(1./3.)-1.) 1. 500. s
text 400.0 0.05 'Drell-Yan' 0.55 0. c
*text 2.5 0.6 '0.027((A/2)^1/3!-1)' 0.5 0.
text 40. -0.05 '0.027((A/2)^1/3!-1)' 0.5 0.
arrow 100. 100. -0.01 0.065
set hcol 3
set plci 3
set pmci 3
set txci 3
graphic/hplot/errors x2 y2 ex2 ey2 5 22 0.3
text 6.0 0.28 ' [U](1S)' 0.55 0.
*text 2.5 0.4 '0.116((A/2)^1/3!-1)' 0.5 0.
*arrow 50. 90. 0.37 0.3