Mercurial > octave

comparison libinterp/corefcn/__ilu__.cc @ 21604:d7a268e68e69

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
maint: Strip trailing whitespace from source files.
author John W. Eaton <jwe@octave.org>
date Mon, 11 Apr 2016 10:53:18 -0400
parents 683a1beee538
children aba2e6293dd8
comparison
equal deleted inserted replaced
21603:37cbdf7bffa9 21604:d7a268e68e69
241 OCTAVE_LOCAL_BUFFER (octave_idx_type, Lfirst, n); 241 OCTAVE_LOCAL_BUFFER (octave_idx_type, Lfirst, n);
242 OCTAVE_LOCAL_BUFFER (T, cr_sum, n); 242 OCTAVE_LOCAL_BUFFER (T, cr_sum, n);
243 243
244 T zero = T (0); 244 T zero = T (0);
245 245
246 // Initialize working arrays 246 // Initialize working arrays
247 cidx_u[0] = cidx_in_u[0]; 247 cidx_u[0] = cidx_in_u[0];
248 cidx_l[0] = cidx_in_l[0]; 248 cidx_l[0] = cidx_in_l[0];
249 for (i = 0; i < n; i++) 249 for (i = 0; i < n; i++)
250 { 250 {
251 w_data_u[i] = zero; 251 w_data_u[i] = zero;
607 OCTAVE_LOCAL_BUFFER (T, w_data, n); 607 OCTAVE_LOCAL_BUFFER (T, w_data, n);
608 OCTAVE_LOCAL_BUFFER (octave_idx_type, iperm, n); 608 OCTAVE_LOCAL_BUFFER (octave_idx_type, iperm, n);
609 octave_idx_type* perm = perm_vec.fortran_vec (); 609 octave_idx_type* perm = perm_vec.fortran_vec ();
610 OCTAVE_LOCAL_BUFFER (octave_idx_type, uptr, n); 610 OCTAVE_LOCAL_BUFFER (octave_idx_type, uptr, n);
611 611
612 // Initialize working and permutation arrays 612 // Initialize working and permutation arrays
613 cidx_l[0] = cidx_in[0]; 613 cidx_l[0] = cidx_in[0];
614 cidx_u[0] = cidx_in[0]; 614 cidx_u[0] = cidx_in[0];
615 for (i = 0; i < n; i++) 615 for (i = 0; i < n; i++)
616 { 616 {
617 w_data[i] = 0; 617 w_data[i] = 0;