Back to COFILT example.        Go to the list of seismic processes.

sioseis << !
procs diskin cofilt prout diskoa end

diskin
 ipath /net/reddata/wahoo2/simpsons/segy.d/21.d/line_21_filt_fkmig_2400.
7800.segy
 fno 2400 lno 7800
 set 4.6 7.0
 end
end

cofilt
  dx 6.25
  nxwin 15
  vmmi 2000 300000 20
  weight 1 1 2 3 3 4 5 5 5 4 3 3 2 1 1
  end
end
prout
   fno 0 lno 99999 noinc 500 ftr 0 ltr 999 end
end
diskoa
 opath odata end
end
end

end

sioseis << !
procs diskin prout agc plot end
diskin
 ipath /net/reddata/wahoo2/simpsons/segy.d/21.d/line_21_filt_fkmig_2400.
7800.segy
!   ipath odata
 fno 2400 lno 5000 allno no
 set 4.6 7.0
 end
end

cofilt
  dx 6.25
  nxwin 15
  vmmi 2000 300000 20
  weight 1 1 2 3 3 4 5 5 5 4 3 3 2 1 1
  end
end
agc
   winlen .5 end
end
prout
   fno 0 lno 99999 noinc 500 ftr 0 ltr 999 end
end
plot
   srpath sunfil.ras vscale 1.25 trpin 300 nibs 2858
   def .005 clip .003 wiggle 0 stime 4 nsecs 3
   ann rpno taginc 100
   end
end
end
!
xloadimage -r 90 sunfil.ras &