Input data (a few traces from two cdp gathers).  The second rp is
shifted in time to show that wbt picker use the first trace of each rp.

sioseis << eof
procs diskin shift plot end
diskin
  fno 424 lno 425 set 4.4 5.4 ftr 1 ltr 20
   ipath 504B.02A.g.424.974 end
end
shift
   fno 425 lno 425 rshift .1 end end
plot
  ann rpno fspace 20 nspace 3 spacei 20
    nibs 75 vscale 5. trpin 10 nsecs 1 def .04 srpath sunfil end end
end

sioseis << eof
procs diskin shift wbt mute plot end
diskin
  fno 424 lno 425 set 4.4 5.4 ftr 1 ltr 20
   ipath 504B.02A.g.424.974 end
end
wbt
  prestk yes
  solrat 3 sel 4.4 5.4 ses 0 .04 end
end
mute
  ttp 1 0 addwb yes end
end
shift
   fno 425 lno 425 rshift .1 end
end
plot
  ann rpno fspace 20 nspace 3 spacei 20
    nibs 75 vscale 5. trpin 10 nsecs 1 def .04 srpath sunfil end
end
prout
   fno 0 lno 9999 ftr 0 ltr 9999 end
end
end
xv sunfil