SIOSEIS script to plot the instantaneous amplitude traces.

sioseis << eof
procs diskin plot end
diskin
   fno 469 lno 1475 allno no set .190 .240
    ipath L001_001.anal end
end
plot
   wiggle 0  ann gmtint anninc 1
   trpin 150 clip .005 def .002 tlines .001
   srpath sunfil
  nibs 2859 nsecs .04 vscale 75.75758
   end
end
end
eof
xloadimage -r 90 sunfil &