Mercurial > octave-nkf

comparison src/DLD-FUNCTIONS/colamd.cc @ 5604:2857357f9d3c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2006-01-31 18:22:59 by jwe]
author jwe
date Tue, 31 Jan 2006 18:23:00 +0000
parents b4cfbb0ec8c4
children 7171d19706df
comparison
equal deleted inserted replaced
5603:2c66c36d2698 5604:2857357f9d3c
335 if (args(0).is_complex_type ()) 335 if (args(0).is_complex_type ())
336 { 336 {
337 scm = args(0). sparse_complex_matrix_value (); 337 scm = args(0). sparse_complex_matrix_value ();
338 n_row = scm.rows (); 338 n_row = scm.rows ();
339 n_col = scm.cols (); 339 n_col = scm.cols ();
340 nnz = scm.nnz (); 340 nnz = scm.nzmax ();
341 ridx = scm.xridx (); 341 ridx = scm.xridx ();
342 cidx = scm.xcidx (); 342 cidx = scm.xcidx ();
343 } 343 }
344 else 344 else
345 { 345 {
346 sm = args(0).sparse_matrix_value (); 346 sm = args(0).sparse_matrix_value ();
347 347
348 n_row = sm.rows (); 348 n_row = sm.rows ();
349 n_col = sm.cols (); 349 n_col = sm.cols ();
350 nnz = sm.nnz (); 350 nnz = sm.nzmax ();
351 ridx = sm.xridx (); 351 ridx = sm.xridx ();
352 cidx = sm.xcidx (); 352 cidx = sm.xcidx ();
353 } 353 }
354 } 354 }
355 else 355 else
359 else 359 else
360 sm = SparseMatrix (args(0).matrix_value ()); 360 sm = SparseMatrix (args(0).matrix_value ());
361 361
362 n_row = sm.rows (); 362 n_row = sm.rows ();
363 n_col = sm.cols (); 363 n_col = sm.cols ();
364 nnz = sm.nnz (); 364 nnz = sm.nzmax ();
365 ridx = sm.xridx (); 365 ridx = sm.xridx ();
366 cidx = sm.xcidx (); 366 cidx = sm.xcidx ();
367 } 367 }
368 368
369 // Allocate workspace for colamd 369 // Allocate workspace for colamd
544 if (args(0).is_complex_type ()) 544 if (args(0).is_complex_type ())
545 { 545 {
546 scm = args(0).sparse_complex_matrix_value (); 546 scm = args(0).sparse_complex_matrix_value ();
547 n_row = scm.rows (); 547 n_row = scm.rows ();
548 n_col = scm.cols (); 548 n_col = scm.cols ();
549 nnz = scm.nnz (); 549 nnz = scm.nzmax ();
550 ridx = scm.xridx (); 550 ridx = scm.xridx ();
551 cidx = scm.xcidx (); 551 cidx = scm.xcidx ();
552 } 552 }
553 else 553 else
554 { 554 {
555 sm = args(0).sparse_matrix_value (); 555 sm = args(0).sparse_matrix_value ();
556 n_row = sm.rows (); 556 n_row = sm.rows ();
557 n_col = sm.cols (); 557 n_col = sm.cols ();
558 nnz = sm.nnz (); 558 nnz = sm.nzmax ();
559 ridx = sm.xridx (); 559 ridx = sm.xridx ();
560 cidx = sm.xcidx (); 560 cidx = sm.xcidx ();
561 } 561 }
562 } 562 }
563 else 563 else
567 else 567 else
568 sm = SparseMatrix (args(0).matrix_value ()); 568 sm = SparseMatrix (args(0).matrix_value ());
569 569
570 n_row = sm.rows (); 570 n_row = sm.rows ();
571 n_col = sm.cols (); 571 n_col = sm.cols ();
572 nnz = sm.nnz (); 572 nnz = sm.nzmax ();
573 ridx = sm.xridx (); 573 ridx = sm.xridx ();
574 cidx = sm.xcidx (); 574 cidx = sm.xcidx ();
575 } 575 }
576 576
577 if (n_row != n_col) 577 if (n_row != n_col)
669 if (args(0).is_complex_type ()) 669 if (args(0).is_complex_type ())
670 { 670 {
671 scm = args(0).sparse_complex_matrix_value (); 671 scm = args(0).sparse_complex_matrix_value ();
672 n_row = scm.rows (); 672 n_row = scm.rows ();
673 n_col = scm.cols (); 673 n_col = scm.cols ();
674 nnz = scm.nnz (); 674 nnz = scm.nzmax ();
675 ridx = scm.xridx (); 675 ridx = scm.xridx ();
676 cidx = scm.xcidx (); 676 cidx = scm.xcidx ();
677 } 677 }
678 else 678 else
679 { 679 {
680 sm = args(0).sparse_matrix_value (); 680 sm = args(0).sparse_matrix_value ();
681 n_row = sm.rows (); 681 n_row = sm.rows ();
682 n_col = sm.cols (); 682 n_col = sm.cols ();
683 nnz = sm.nnz (); 683 nnz = sm.nzmax ();
684 ridx = sm.xridx (); 684 ridx = sm.xridx ();
685 cidx = sm.xcidx (); 685 cidx = sm.xcidx ();
686 } 686 }
687 687
688 } 688 }