sioseis << eof
procs diskin filter gains plot end
diskin
    fno 81901 lno 81950 ftr 4 ltr 4 set 4 7
    ipath ew9513_line7.segy end
end
filter
   ftype 0 pass 30 120 dbdrop 48 end
end
gains
   type 5 alpha .5 end
end
plot
    nibs 75 def .08 trpin 20 vscale 5 clip .04 nsecs 3
    srpath sunfil
    end
end
end
eof
xloadimage -r 90 sunfil &