# HG changeset patch
# User David Bateman <dbateman@free.fr>
# Date 1211532298 -7200
# Node ID 7ab1ccf4256c0343e3e2281e4a98200fa33b2c5a
# Parent  d4565e8129482c4790bd4acc85a71e2cf6788eb3
Correct initialize in FloatAEPBALANCE::init

diff --git a/liboctave/ChangeLog b/liboctave/ChangeLog
--- a/liboctave/ChangeLog
+++ b/liboctave/ChangeLog
@@ -1,3 +1,9 @@
+2008-06-02  David Bateman  <dbateman@free.fr>
+
+	* floatAEPBAL.cc (octave_idx_type FloatAEPBALANCE::init (const
+	FloatMatrix&, const std::string&)): Use FloatMatrix to initialize
+	balancing_mat.
+
 2008-05-21  David Bateman  <dbateman@free.fr>
 
 	* Quad-opts.in: Handle single precision tolerances.
diff --git a/liboctave/floatAEPBAL.cc b/liboctave/floatAEPBAL.cc
--- a/liboctave/floatAEPBAL.cc
+++ b/liboctave/floatAEPBAL.cc
@@ -74,7 +74,7 @@
 			     n, p_balanced_mat, n, ilo, ihi, pscale, info
 			     F77_CHAR_ARG_LEN (1)));
 
-  balancing_mat = Matrix (n, n, 0.0);
+  balancing_mat = FloatMatrix (n, n, 0.0);
   for (octave_idx_type i = 0; i < n; i++)
     balancing_mat.elem (i ,i) = 1.0;