--- a/liboctave/dMatrix.cc	Thu Jul 10 17:36:20 2008 -0400
+++ b/liboctave/dMatrix.cc	Fri Jul 11 14:56:30 2008 -0400
@@ -2849,6 +2849,20 @@
   return false;
 }
 
+bool
+Matrix::any_element_is_nan (void) const
+{
+  octave_idx_type nel = nelem ();
+
+  for (octave_idx_type i = 0; i < nel; i++)
+    {
+      double val = elem (i);
+      if (xisnan (val))
+	return true;
+    }
+
+  return false;
+}
 
 bool
 Matrix::any_element_is_inf_or_nan (void) const