Mercurial > hg > octave-nkf

diff liboctave/CNDArray.cc @ 5110:ea96466f98ea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-01-19 02:11:53 by jwe]
author jwe
date Wed, 19 Jan 2005 02:11:53 +0000
parents e35b034d3523
children f2858bbf0277
line wrap: on
line diff
--- a/liboctave/CNDArray.cc
+++ b/liboctave/CNDArray.cc
@@ -613,7 +613,10 @@
 ComplexNDArray::any (int dim) const
 {
   MX_ND_ANY_ALL_REDUCTION
-    (MX_ND_ANY_EVAL (elem (iter_idx) != Complex (0, 0)), false);
+    (MX_ND_ANY_EVAL (elem (iter_idx) != Complex (0, 0)
+		     && ! (lo_ieee_isnan (::real (elem (iter_idx)))
+			   || lo_ieee_isnan (::imag (elem (iter_idx))))),
+		     false);
 }
 
 ComplexNDArray