set style line 1 lt 1 lw 2 lc rgb 'black'
set style line 2 lt 2 lw 2 lc rgb 'red'
set style line 3 lt 3 lw 2 lc rgb 'blue'
set style line 4 lt 4 lw 2 lc rgb 'purple'
set style line 5 lt 5 lw 2 lc rgb 'magenta'
set style line 6 lt 6 lw 2 lc rgb 'cyan'
e1=1.97
g1=1.0
c1=0.02
d1=-0.2
f1(x)= (g1/2) / ( (g1/2)**2 + (x-e1)**2 ) + c1*x + d1
fit[1:4] f1(x) 'fort.113' u 1:3 via e1,g1,c1,d1
p[0:6] \
'fort.113' u 1:3 ti 'for p_{3/2}', \
f1(x) w l ls 3 ti 'fitting'
pause 2
set size 0.5,0.5
set title 'Scattering of {/Symbol a} + p'
set xrange[0:6]
set xlabel 'E (MeV)'
set yrange[0:1.2]
set ylabel 'd{/Symbol s}(E)/dE'
set terminal postscript eps enhanced color
set output 'g_pshift_5li.eps'
replot
set terminal x11
reset
