Mercurial > octave-nkf

comparison src/DLD-FUNCTIONS/qr.cc @ 7924:4976f66d469b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
miscellaneous cleanup
author John W. Eaton <jwe@octave.org>
date Fri, 11 Jul 2008 17:59:28 -0400
parents e3e94982dfd4
children 445d27d79f4e
comparison
equal deleted inserted replaced
7923:c3d21b9b94b6 7924:4976f66d469b
1427 octave_value argj = args(3); 1427 octave_value argj = args(3);
1428 1428
1429 if (argq.is_matrix_type () && argr.is_matrix_type () 1429 if (argq.is_matrix_type () && argr.is_matrix_type ()
1430 && argi.is_real_scalar () && argj.is_real_scalar ()) 1430 && argi.is_real_scalar () && argj.is_real_scalar ())
1431 { 1431 {
1432 octave_idx_type m = argq.rows ();
1433 octave_idx_type n = argr.columns (); 1432 octave_idx_type n = argr.columns ();
1434 octave_idx_type k = argq.columns (); 1433 octave_idx_type k = argq.columns ();
1435 1434
1436 if (argr.rows () == k) 1435 if (argr.rows () == k)
1437 { 1436 {