home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l460 / 2.ddi / ELMAT.DI$ / ISUNIX.M < prev    next >
Encoding:
Text File  |  1993-03-07  |  294 b   |  15 lines
  1. function yn = isunix()
  2. %ISUNIX    True for UNIX operating systems.
  3.  
  4. %       Copyright (c) 1984-93 by The MathWorks, Inc.
  5.  
  6. c = computer;
  7. yn = 1;
  8. if strcmp(c(1:2),'PC') |  strcmp(c(1:2),'MA')
  9.    yn = 0;
  10. elseif strcmp(c(1:2),'VA')
  11.    if strcmp(c(1:6),'VAXVMS')
  12.       yn = 0;
  13.    end
  14. end
  15.