sioseis << eof
procs diskin mute smute stack agc plot end
diskin
!   ipath /home/archive/mcs/1999/odp/segy-cmp/line23.g.3116.4615
   ipath  line23.g.3116.3120
   end
end
agc
   winlen .5 end
end
mute
   xtp 2000 4.8 3000 5.2 6000 8.   end
end
smute
   xtp 0 5.5 3000 9 end
end
plot
   ann range taginc 2
   nibs 75 def .1 vscale 2.5 nsecs 4 trpin 2
   srpath sunfil end
end
end
eof
xloadimage -r 90 sunfil &