# generic commands for twographbox output size
load "twographbox.in"



set data style lines

set xlabel "Discount factor {/Symbol g}"
set ylabel "Iterations required" 
set xrange [0.5:0.99999]
set logscale y 10
#set yrange [0:1]
#set nokey
set samples 1000
#show samples

iterations(x,c) = ceil(log(2/(c*(1-x)))/log(1/x))



set output "discount-iterations.eps"

plot iterations(x,0.0001) title "{/Times-Italic c} = 0.0001" lw 2, iterations(x,0.001) title "{/Times-Italic c} = 0.001" lw 2, iterations(x,0.01) title "{/Times-Italic c} = 0.01" lw 2, iterations(x,0.1) title "{/Times-Italic c} = 0.1"  lw 2