Extract 50 rps using an increment of 100 sioseis << eof procs diskin filter diskoa end diskin ipath gathers.day068-0000z fno 15100 lno 20000 noinc 100 end end filter ftype 0 dbdrop 48 pass 20 70 end end diskoa opath data end end end