diff options
Diffstat (limited to 'macros/isallpass.sci')
-rw-r--r-- | macros/isallpass.sci | 24 |
1 files changed, 23 insertions, 1 deletions
diff --git a/macros/isallpass.sci b/macros/isallpass.sci index d76c295..ba14c4e 100644 --- a/macros/isallpass.sci +++ b/macros/isallpass.sci @@ -5,10 +5,32 @@ //flag = isallpass(sos) //flag = isallpass(...,tol) // b and a are the vectors containing zero and pole coefficients respectively -//tol, tolerance is used to determine when two numbers are close enough to be considered equal. +//tol, tolerance is used to determine when two numbers are close enough to be considered equal. //Author: Parthasarathi Panda //parthasarathipanda314@gmail.com function isall=isallpass(varargin) + +//Example +//k = [1/2 1/3 1/4 1/5]; +//[b,a] = latc2tf(k,'allpass'); +//flag_isallpass = isallpass(b,a) +// +//OUTPUT : +// flag_isallpass =1 + + +//b = [1/3 1/4 1/5 1]; +//a=b($:-1:1); +//flag = isallpass(b,a) +// +//OUTPUT +// flag=1 + + +//fl=isallpass(1,[1 1]) +// +//OUTPUT +// fl=0 [nargout,nargin]=argn(); if (nargin==2) then v=size(varargin(1)); |