Mercurial > octave-nkf

comparison scripts/control/system/d2c.m @ 5443:ec8c33dcd1bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-09-08 01:40:57 by jwe]
author jwe
date Thu, 08 Sep 2005 01:40:58 +0000
parents 4c8a2e4e0717
children 34f96dd5441b
comparison
equal deleted inserted replaced
5442:636886245488 5443:ec8c33dcd1bf
71 elseif (!isstruct(sys)) 71 elseif (!isstruct(sys))
72 error("sys must be in system data structure"); 72 error("sys must be in system data structure");
73 elseif(nargin == 1) 73 elseif(nargin == 1)
74 opt = "log"; 74 opt = "log";
75 tol = 1e-12; 75 tol = 1e-12;
76 elseif(isstr(opt)) # all remaining cases are for nargin == 2 76 elseif(ischar(opt)) # all remaining cases are for nargin == 2
77 tol = 1e-12; 77 tol = 1e-12;
78 if( !(strcmp(opt,"log") | strcmp(opt,"bi") ) ) 78 if( !(strcmp(opt,"log") | strcmp(opt,"bi") ) )
79 error(["d2c: invalid opt passed=",opt]); 79 error(["d2c: invalid opt passed=",opt]);
80 endif 80 endif
81 elseif(!is_sample(opt)) 81 elseif(!is_sample(opt))