sioseis << eof procs syn filter plot end syn fno 1 lno 1 ntrcs 1 secs .2 tva .035 10000 1 .135 10000 -1 end end filter pass 10 30 end end plot nsecs .2 ann rpno anninc 50 tlines .1 nibs 75 trpin 20 vscale 45 def .20 wiggle 0 bcolor white colors -.1 blue 0 green .1 red opath siofil end end end eof sio2sun siofil sunplt xv sunplt