Changeset 501 in Sophya for trunk/SophyaLib/NTools/tmatrix.cc

Timestamp:

Oct 23, 1999, 12:21:23 PM (26 years ago)

Author:

ansari

Message:

cvector.h ne servait a rien cmv 23/10/99

File:

• trunk/SophyaLib/NTools/tmatrix.cc (modified) (3 diffs)

trunk/SophyaLib/NTools/tmatrix.cc

@@ -1 @@
-// $Id: tmatrix.cc,v 1.9 1999-05-19 10:17:41 ansari Exp $
+// $Id: tmatrix.cc,v 1.10 1999-10-23 10:21:23 ansari Exp $
 //                         C.Magneville          04/99
 #include "machdefs.h"
@@ -201 +201 @@
 // * Attention: egcs impose que cette fonction soit mise dans le .cc
 //              avant ::Inverse() (car Inverse() l'utilise)
-// {Matrix A(a); Matrix B(b); return (r_8) Matrix::GausPiv(A,B);}
+// {TMatrix A(a); TMatrix B(b); return (r_8) TMatrix::GausPiv(A,B);}
 {
 uint_4 n = a.NRows();
@@ -226 +226 @@
   double ld = a.NRows() * log(nrm);
   if (ld <= LN_MINDOUBLE || ld >= LN_MAXDOUBLE) {
-   // cerr << "Matrix warning, overflow for det" << endl;
+   // cerr << "TMatrix warning, overflow for det" << endl;
   } else {
     det = exp(ld);