home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l455 / 7.ddi / ROBUST.DI$ / ORTR.M < prev    next >
Encoding:
Text File  |  1993-03-11  |  406 b   |  16 lines
  1. function [a1cmp] = ortr(a1)
  2. %
  3. % [A1CMP] = ORTR(A1) produces an orthogonal complement of a
  4. %       row type matrix via the duality of ORTC.
  5. %
  6.  
  7. % R. Y. Chiang & M. G. Safonov 7/85
  8. % Copyright (c) 1988 by the MathWorks, Inc.
  9. % All Rights Reserved.
  10. % ----------------------------------------------------------------
  11. %
  12. [app] = ortc(a1');
  13. a1cmp = app';
  14. %
  15. % ----- End of ORTR.M ---- RYC/MGS 7/85 %
  16.