# Constant velocity stacks of 50 rps, velocities 1450 to 2100 by 50
sioseis << eof
procs diskin velan stack filter diskoa end
diskin
   fno 1051 lno 1100 set 5 8
   ipath rps.line.1 end
end
prout
   fno 0 lno 9999 ftr 0 ltr 999 end
end
velan
   type cvel nrp 50 vels 1450 50 2100 end
end
filter
   ftype 0 dbdrop 48 pass 10 80 end
end
diskoa
   opath cvstk.line.1 end
end
end
eof