changeset 2367:5c9e8f5c10c3

[project @ 1996-10-11 23:37:12 by jwe]
author jwe
date Fri, 11 Oct 1996 23:37:13 +0000
parents c90105b99479
children bf6a96fd9b7e
files src/balance.cc src/dassl.cc src/fsolve.cc src/lsode.cc src/npsol.cc src/qpsol.cc src/quad.cc src/svd.cc
diffstat 8 files changed, 9 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/src/balance.cc
+++ b/src/balance.cc
@@ -56,7 +56,7 @@
   B: (default) permute and scale, in that order.  Rows/columns\n\
      of a (and b) that are isolated by permutation are not scaled\n\
 \n\
-[DD, AA] = balance (A, OPT) returns aa = dd\a*dd,\n\
+[DD, AA] = balance (A, OPT) returns aa = dd*a*dd,\n\
 \n\
 [CC, DD, AA, BB] = balance (A, B, OPT) returns AA (BB) = CC*A*DD (CC*B*DD)")
 {
--- a/src/dassl.cc
+++ b/src/dassl.cc
@@ -36,6 +36,7 @@
 #include "help.h"
 #include "oct-obj.h"
 #include "pager.h"
+#include "pt-fvc.h"
 #include "utils.h"
 #include "variables.h"
 
--- a/src/fsolve.cc
+++ b/src/fsolve.cc
@@ -35,6 +35,7 @@
 #include "gripes.h"
 #include "help.h"
 #include "pager.h"
+#include "pt-fvc.h"
 #include "oct-obj.h"
 #include "utils.h"
 #include "variables.h"
--- a/src/lsode.cc
+++ b/src/lsode.cc
@@ -36,6 +36,7 @@
 #include "help.h"
 #include "oct-obj.h"
 #include "pager.h"
+#include "pt-fvc.h"
 #include "utils.h"
 #include "variables.h"
 
--- a/src/npsol.cc
+++ b/src/npsol.cc
@@ -37,6 +37,7 @@
 #include "mappers.h"
 #include "oct-obj.h"
 #include "pager.h"
+#include "pt-fvc.h"
 #include "utils.h"
 #include "variables.h"
 
--- a/src/qpsol.cc
+++ b/src/qpsol.cc
@@ -37,6 +37,7 @@
 #include "mappers.h"
 #include "oct-obj.h"
 #include "pager.h"
+#include "pt-fvc.h"
 #include "utils.h"
 #include "variables.h"
 
--- a/src/quad.cc
+++ b/src/quad.cc
@@ -36,6 +36,7 @@
 #include "help.h"
 #include "mappers.h"
 #include "pager.h"
+#include "pt-fvc.h"
 #include "oct-obj.h"
 #include "utils.h"
 #include "variables.h"
--- a/src/svd.cc
+++ b/src/svd.cc
@@ -74,7 +74,7 @@
 
       if (! error_state)
 	{
-	  if (any_element_is_inf_or_nan (tmp))
+	  if (tmp.any_element_is_inf_or_nan ())
 	    {
 	      error ("svd: cannot take SVD of matrix containing Inf or\
  NaN values"); 
@@ -103,7 +103,7 @@
 
       if (! error_state)
 	{
-	  if (any_element_is_inf_or_nan (ctmp))
+	  if (ctmp.any_element_is_inf_or_nan ())
 	    {
 	      error ("svd: cannot take SVD of matrix containing Inf or\
  NaN values");