sioseis << eof
procs diskin weight filter plot end
diskin
   set 5 9 fno 1 lno 1 ipath test.line.1 end
end
gather
   end
end
weight
  fno 0 lno 99999 twp 4 0 21 0 22 0 23 0 24 0 30 0 31 0 34 0 48 0 end
end
filter
   ftype 0 dbdrop 48 pass 10 80 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 &