Go to the list of seismic processes.
Go to SIOSEIS introduction.
sioseis << eof
procs sort diskin agc plot end
diskin
spath sfile
ipath little.fkmigr.new end
end
prout
fno 0 lno 999999 ftr 0 ltr 9999 end
end
sort
ipath little.fkmigr.new opath sfile
lkey1 6 rev1 yes end
end
agc
winlen .01 end
end
filter
pass 100 800 ftype 0 dbdrop 48 end
end
plot
wiggle 0
nsecs .12 tlines .01 .05 .1 stime 0
nibs 300 trpin 20 vscale 26.6666 def .14 clip .14
! ftag 1 taginc 10 ann rpno
ftag 5 taginc 40 ann fanno fanno 4 anninc -1
srpath sunfil end
end
end
eof
xloadimage -r 90 sunfil &