home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l455 / 10.ddi / CONTROL.DI$ / LTIFR.M < prev    next >
Encoding:
Text File  |  1993-03-11  |  612 b   |  23 lines
  1. %
  2. %LTIFR    Linear time-invariant frequency response kernel.
  3. %    G = LTIFR(A,b,S) calculates the frequency response of the
  4. %    system:
  5. %         G(s) = (sI - A)\b
  6. %
  7. %    for the complex frequencies in vector S. Column vector b
  8. %    must have as many rows as matrix A. Matrix G is returned
  9. %    with SIZE(A) rows and LENGTH(S) columns.
  10. %    Here is what it implements, in high speed:
  11. %
  12. %        function g = ltifr(a,b,s)
  13. %        ns = length(s); na = length(a);
  14. %        e = eye(na); g = sqrt(-1) * ones(na,ns);
  15. %        for i=1:ns
  16. %            g(:,i) = (s(i)*e-a)\b;
  17. %        end
  18. %
  19.  
  20. %    Copyright (c) 1986-93 by the MathWorks, Inc.
  21.  
  22. % built-in function
  23.