#!/bin/csh -f
set nonomatch

sddsmakedataset scan.sdds \
    -column=Q1,type=double -data=-2,-1.5,-1.0,-0.5,-0.1,-0.1,-0.1,-0.1,-0.1,-0.1 \
    -column=Q2,type=double -data=0.1,0.1,0.1,0.1,0.1,0.5,1.0,1.5,2.0,2.5 

set n = `sdds2stream -rows=bare scan.sdds`

elegant quad.ele

while ( 1 > 0 )
 echo -n "Enter index for display (1-$n): "
 set i=$<
 if ( $i > 0 && $i <= $n) then
   sddsplot -column=s,beta? quad.twi -split=page -topage=$i -frompage=$i -title="Page $i"  -graph=line,vary
 endif
end

