out=1

a=0.6

if (out==1) set size a,a
if (out==1) set output "S_FeSb2.eps"
if (out==1) set terminal postscript enhanced color #"Helvetica,11"


lws=7
set border lw 2

set xrange[0:120]
set yrange[-1200:500]
set key bottom Left right reverse at 135,-1150 samplen 1.5 

set ylabel "S [{/Symbol m}V/K]"
set xlabel "T [K]"


#set arrow 1 from 25,350 to 30,350
#set arrow 2 from 75,350 to 70,350


#set style rect fc lt -1 fs solid 0.15 noborder
#set obj rect from 35, graph 0 to 70, graph 1


set table 'filledbg.tab'
splot x*4
unset table
unset colorbox
set palette defined (0 0.2 0.2 0.2, 1 1.0 1.0 1.0)

lws2=5
#binary array=(128,128) flipy center=( 64,201 )

p  'filledbg.tab' u (35+$1/120*30):2:3  w image t '', \
  "response.dat_1" u 1:(-0.08617*  ($4)/($3)*1000. ) w l lw lws ti "{/Helvetica=13 Theory, x}" \
,  "response.dat_2" u 1:(-0.08617*  ($4)/($3)*1000. ) w l lw lws ti "{/Helvetica=13 Theory, y}" \
,  "response.dat_3" u 1:(-0.08617*  ($4)/($3)*1000. ) w l lw lws ti "{/Helvetica=13 Theory, z}" \
, 0  lt -1 lw 2 ti "" \
, "../../../thermo_Bentien_c.dat" u 1:($2) w l lt 4 lw lws2 ti "{/Helvetica=13 Bentien et al, x}"\
, "../../../thermo_Bentien_b.dat" u 1:($2) w l lt 5 lw lws2 ti "{/Helvetica=13 Bentien et al, y}"\
, "../../../thermo_Bentien_a.dat" u 1:($2) w l lt 6 lw lws2 ti "{/Helvetica=13 Bentien et al, z}"


#, "../../../thermo_Bentien_c.dat" u 1:($2) w l lt 4 lw lws2 ti "Exp (A), x"\
#, "../../../thermo_Bentien_b.dat" u 1:($2) w l lt 5 lw lws2 ti "Exp (A), y"\
#, "../../../thermo_Bentien_a.dat" u 1:($2) w l lt 6 lw lws2 ti "Exp (A), z"\
#, "../../../Bentien_S_FeSb2_poly.dat" u 1:($2) w l lt 7 lw lws2 ti "Exp (B), poly"\
#, "../../../Sun_FeSb2_film.dat" u 1:($2) w l lt 8 lw lws2 ti "Exp (C), <101>"