sioseis << eof procs diskin filter gains plot end diskin fno 81901 lno 81950 ftr 4 ltr 4 set 4 7 ipath ew9513_line7.segy end end filter ftype 0 pass 30 120 dbdrop 48 end end gains type 5 alpha .5 end end plot nibs 75 def .08 trpin 20 vscale 5 clip .04 nsecs 3 srpath sunfil end end end eof xloadimage -r 90 sunfil &