Mercurial > hg > octave-nkf

comparison scripts/polynomial/residue.m @ 3456:434790acb067

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-01-19 06:58:51 by jwe]
author jwe
date Wed, 19 Jan 2000 06:59:23 +0000
parents f8dde1807dee
children e031284eea27
comparison
equal deleted inserted replaced
3455:f758be6e1730 3456:434790acb067
169 ## |-2| | 0 1 1 | | r(3) | 169 ## |-2| | 0 1 1 | | r(3) |
170 ## 170 ##
171 ## We then solve for the residues using matrix division. 171 ## We then solve for the residues using matrix division.
172 172
173 if (nargin < 2 || nargin > 3) 173 if (nargin < 2 || nargin > 3)
174 usage ("residue (b, a [, toler])"); 174 usage ("residue (b, a, toler)");
175 endif 175 endif
176 176
177 if (nargin == 2) 177 if (nargin == 2)
178 toler = .001; 178 toler = .001;
179 endif 179 endif