# plot the first shot to the screen
sioseis << eof
procs diskin plot end
diskin
   set 5 9 fno 1 lno 1 ipath test.line.1 end end
plot
   srpath sunfil nsecs 4  ann shottr ftag 1 taginc 10
   nibs 75 trpin 10 vscale 3.333 def .08 clip .08 end
end
end
eof
xloadimage -r 90 sunfil &