filled





# source the library


source zplot.tcl


namespace import Zplot::*





# define the canvas


PsCanvas -title "filled.eps" -width 3.5in -height 2.75in





# read in the file into a table called bar1


Table -table line1 -file "data.flines1"


Table -table line2 -file "data.flines2"





# this defines one particular drawing area


set xrange [TableGetRange -table line1,line2 -column x,x]


set ymax   [TableGetMax -table line1,line2 -column y,y]





# make drawable


Drawable -xrange $xrange -yrange 0,$ymax





# now plot filled region first, then line on top of it (for both gray area behind and then blue on top)


PlotVerticalFill -table line1 -xfield x -yfield y -fillstyle solid -fillcolor lightgray


PlotLines -table line1 -xfield x -yfield y -linecolor darkgray 





PlotVerticalFill -table line2 -xfield x -yfield y -fillstyle solid -fillcolor lightblue


PlotLines -table line2 -xfield x -yfield y -linecolor darkblue 





# axes?


AxesTicsLabels 





# all done


PsRender -file filled.eps
Data: data.flines1 Data: data.flines2