Go to the list of seismic processes.      Go to SIOSEIS introduction.

sioseis << eof
procs diskin t2f f2t gains agc plot end
diskin
   ipath L001_001.sgy end
end
agc
   winlen .025 center .001 end
end
gains
   type 7 end  ! complex modulus
end
t2f
   end
end
f2t
   type analytic end
end
plot
  colors gray opath siofil
   wiggle 0  ann gmtint anninc 1
   trpin 300 def .004 tlines .01 .05
  nibs 2859  vscale 10  nsecs 0 end
end
end
eof
sio2sun siofil sunfil.ras
xloadimage -r 90 sunfil.ras &