home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l460 / 2.ddi / SPARFUN.DI$ / ISSPARSE.M < prev    next >
Encoding:
Text File  |  1993-03-07  |  255 b   |  10 lines

  1. function ans = issparse(S);
  2. %ISSPARSE True if matrix is sparse.
  3. %    ISSPARSE(S) is 1 if the storage class of S is sparse
  4. %    and 0 otherwise.
  5.  
  6. %    Copyright (c) 1984-93 by The MathWorks, Inc.
  7.  
  8. ans = 0;
  9. if ~isempty(S), ans = sparsfun('issparse',S); end
  10.