# HG changeset patch
# User jwe
# Date 1142539266 0
# Node ID e7790bb14cfcd85dc96919589205691b5270a14b
# Parent  40b08b29dd538ed1bdc5635022d034c5666b9bd1
[project @ 2006-03-16 20:01:05 by jwe]

diff -r 40b08b29dd53 -r e7790bb14cfc scripts/ChangeLog
--- a/scripts/ChangeLog	Thu Mar 16 19:47:14 2006 +0000
+++ b/scripts/ChangeLog	Thu Mar 16 20:01:06 2006 +0000
@@ -1,3 +1,8 @@
+2006-03-16  John W. Eaton  <jwe@octave.org>
+
+	* control/base/bode_bounds.m: Check for iip and iiz empty instead
+	of looking at sum of max dimensions.
+
 2006-03-16  David Bateman  <dbateman@free.fr>
 
 	* testfun/test.m: Clear last warning before warning test to avoid
diff -r 40b08b29dd53 -r e7790bb14cfc scripts/control/base/bode_bounds.m
--- a/scripts/control/base/bode_bounds.m	Thu Mar 16 19:47:14 2006 +0000
+++ b/scripts/control/base/bode_bounds.m	Thu Mar 16 20:01:06 2006 +0000
@@ -63,14 +63,14 @@
     if(!isempty(pol)) cpol = pol(iip);
     else              cpol = [];                endif
   endif
-
-  if(max(size(iip)) + max(size(iiz)) )
-    wmin = floor(log10(min(abs([cpol,czer]))));
-    wmax = ceil(log10(max(abs([cpol,czer]))));
-  else
+  
+  if (isempty (iip) && isempty (iiz))
     ## no poles/zeros away from omega = 0; pick defaults
     wmin = -1;
     wmax = 3;
+  else
+    wmin = floor(log10(min(abs([cpol,czer]))));
+    wmax = ceil(log10(max(abs([cpol,czer]))));
   endif
 
   ## expand to show the entirety of the "interesting" portion of the plot