summaryrefslogtreecommitdiff
path: root/macros/isallpass.sci
diff options
context:
space:
mode:
Diffstat (limited to 'macros/isallpass.sci')
-rw-r--r--macros/isallpass.sci24
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));