home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l455 / 2.ddi / MUTOOLS2.DI$ / GAINO.M < prev    next >
Encoding:
Text File  |  1993-03-11  |  199 b   |  7 lines
  1. function ff = gaino(out,gain,ff,startloc,sysloc)
  2. for i=1:length(out)
  3.  ff(i+startloc,sysloc+out(i)) = ff(i+startloc,sysloc+out(i)) + gain;
  4. end
  5. %
  6. % Copyright MUSYN INC 1991,  All Rights Reserved
  7.