sioseis << eof
procs diskin plot end
diskin
   set .1 .3  fno 101 lno 110 noinc 1 ipath source.sig.test.sgy end
end
plot
   srpath sunfil trpin 5 def .06 tlines .01 .1
   ann shotno scalar 0 taginc 2
   nibs 2847 vscale 13.33333 nsecs .1 end
end
end
eof
xloadimage -r 90 sunfil &