Mercurial > hg > octave-lyh

diff liboctave/dSparse.cc @ 7776:4c3665e65bcd

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Typo DPBCON -> DGBCON
author David Bateman <dbateman@free.fr>
date Wed, 14 May 2008 18:03:58 +0200
parents 36594d5bbe13
children 1a446f28ce68
line wrap: on
line diff
--- a/liboctave/dSparse.cc
+++ b/liboctave/dSparse.cc
@@ -4457,7 +4457,7 @@
 		  Array<octave_idx_type> iz (nr);
 		  octave_idx_type *piz = iz.fortran_vec ();
 
-		  F77_XFCN (dpbcon, DGBCON, 
+		  F77_XFCN (dpbcon, DPBCON, 
 		    (F77_CONST_CHAR_ARG2 (&job, 1),
 		     nr, n_lower, tmp_data, ldm,
 		     anorm, rcond, pz, piz, err
@@ -4705,7 +4705,7 @@
 		  Array<octave_idx_type> iz (nr);
 		  octave_idx_type *piz = iz.fortran_vec ();
 
-		  F77_XFCN (dpbcon, DGBCON, 
+		  F77_XFCN (dpbcon, DPBCON, 
 		    (F77_CONST_CHAR_ARG2 (&job, 1),
 		     nr, n_lower, tmp_data, ldm,
 		     anorm, rcond, pz, piz, err
@@ -5025,7 +5025,7 @@
 		  Array<octave_idx_type> iz (nr);
 		  octave_idx_type *piz = iz.fortran_vec ();
 
-		  F77_XFCN (dpbcon, DGBCON, 
+		  F77_XFCN (dpbcon, DPBCON, 
 		    (F77_CONST_CHAR_ARG2 (&job, 1),
 		     nr, n_lower, tmp_data, ldm,
 		     anorm, rcond, pz, piz, err
@@ -5176,7 +5176,7 @@
 		  Array<octave_idx_type> iz (nr);
 		  octave_idx_type *piz = iz.fortran_vec ();
 
-		  F77_XFCN (dpbcon, DGBCON, 
+		  F77_XFCN (dpbcon, DPBCON, 
 		    (F77_CONST_CHAR_ARG2 (&job, 1),
 		     nr, n_lower, tmp_data, ldm,
 		     anorm, rcond, pz, piz, err
@@ -5325,7 +5325,7 @@
 		  Array<octave_idx_type> iz (nr);
 		  octave_idx_type *piz = iz.fortran_vec ();
 
-		  F77_XFCN (dpbcon, DGBCON, 
+		  F77_XFCN (dpbcon, DPBCON, 
 		    (F77_CONST_CHAR_ARG2 (&job, 1),
 		     nr, n_lower, tmp_data, ldm,
 		     anorm, rcond, pz, piz, err