Mercurial > octave-nkf

comparison src/DLD-FUNCTIONS/ccolamd.cc @ 5631:7171d19706df

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-02-22 20:15:06 by dbateman]
author dbateman
date Wed, 22 Feb 2006 20:16:00 +0000
parents 2857357f9d3c
children 2618a0750ae6
comparison
equal deleted inserted replaced
5630:512d0d11ae39 5631:7171d19706df
209 octave_idx_type n_row, n_col, nnz; 209 octave_idx_type n_row, n_col, nnz;
210 octave_idx_type *ridx, *cidx; 210 octave_idx_type *ridx, *cidx;
211 SparseComplexMatrix scm; 211 SparseComplexMatrix scm;
212 SparseMatrix sm; 212 SparseMatrix sm;
213 213
214 if (args(0).class_name () == "sparse") 214 if (args(0).is_sparse_type ())
215 { 215 {
216 if (args(0).is_complex_type ()) 216 if (args(0).is_complex_type ())
217 { 217 {
218 scm = args(0). sparse_complex_matrix_value (); 218 scm = args(0). sparse_complex_matrix_value ();
219 n_row = scm.rows (); 219 n_row = scm.rows ();
445 octave_idx_type n_row, n_col, nnz; 445 octave_idx_type n_row, n_col, nnz;
446 octave_idx_type *ridx, *cidx; 446 octave_idx_type *ridx, *cidx;
447 SparseMatrix sm; 447 SparseMatrix sm;
448 SparseComplexMatrix scm; 448 SparseComplexMatrix scm;
449 449
450 if (args(0).class_name () == "sparse") 450 if (args(0).is_sparse_type ())
451 { 451 {
452 if (args(0).is_complex_type ()) 452 if (args(0).is_complex_type ())
453 { 453 {
454 scm = args(0).sparse_complex_matrix_value (); 454 scm = args(0).sparse_complex_matrix_value ();
455 n_row = scm.rows (); 455 n_row = scm.rows ();