Mercurial > hg > octave-nkf
comparison liboctave/Array-util.cc @ 5148:9eab94f5fadf
[project @ 2005-02-18 19:04:34 by jwe]
author | jwe |
---|---|
date | Fri, 18 Feb 2005 19:04:34 +0000 |
parents | 100f9c190be4 |
children | 23b37da9fd5b |
comparison
equal
deleted
inserted
replaced
5147:47e4c91e5799 | 5148:9eab94f5fadf |
---|---|
459 Array<int> retval (n_el); | 459 Array<int> retval (n_el); |
460 | 460 |
461 for (int i = 0; i < n_el; i++) | 461 for (int i = 0; i < n_el; i++) |
462 { | 462 { |
463 if (inv) | 463 if (inv) |
464 retval(perm_vec(i)-1) = old_idx(i); | 464 retval(perm_vec(i)) = old_idx(i); |
465 else | 465 else |
466 retval(i) = old_idx(perm_vec(i)-1); | 466 retval(i) = old_idx(perm_vec(i)); |
467 } | 467 } |
468 | 468 |
469 return retval; | 469 return retval; |
470 } | 470 } |
471 | 471 |