a=0.02
b=1.
R0(x)=(x)
set border 1
set noxtics; set noytics; set xtics nomirror; set ytics nomirror
set key below
set xlabel "alpha"
set ylabel ""
set title "nergie en fonction de alpha\n pour t/L = 1/100"
set terminal x11 0
plot [0.0:a] \
'4t/cy-100.alpha' using ($1):(R0($6)) t "8E" with lp, \
'4t/cy-100.alpha' using ($1):(R0($4-$5)) t "8" with lp
set terminal x11 1
plot [a:b] \
'4t/cy-100.alpha' using ($1):(R0($6)) t "8E" with lp, \
'4t/cy-100.alpha' using ($1):(R0($4-$5)) t "8" with lp
