Mercurial > octave-nkf
comparison libinterp/corefcn/mgorth.cc @ 20265:e914b5399c67
Use in-place operators in C++ code where possible.
* libgui/src/dialog.cc, libgui/src/m-editor/file-editor-tab.cc,
libgui/src/main-window.cc, libinterp/corefcn/bsxfun.cc,
libinterp/corefcn/filter.cc, libinterp/corefcn/mgorth.cc,
libinterp/corefcn/oct-stream.cc, libinterp/corefcn/pr-output.cc,
liboctave/array/Array-util.cc, liboctave/array/dim-vector.h,
liboctave/numeric/CollocWt.cc, liboctave/numeric/eigs-base.cc,
liboctave/numeric/lo-specfun.cc:
Use in-place operators in C++ code where possible.
author | Rik <rik@octave.org> |
---|---|
date | Mon, 25 May 2015 22:02:15 -0700 |
parents | 4f45eaf83908 |
children |
comparison
equal
deleted
inserted
replaced
20264:5dfaaaae784f | 20265:e914b5399c67 |
---|---|
43 x -= h(j) * Vcj; | 43 x -= h(j) * Vcj; |
44 } | 44 } |
45 | 45 |
46 h(Vc) = xnorm (x); | 46 h(Vc) = xnorm (x); |
47 if (real (h(Vc)) > 0) | 47 if (real (h(Vc)) > 0) |
48 x = x / h(Vc); | 48 x /= h(Vc); |
49 } | 49 } |
50 | 50 |
51 DEFUN (mgorth, args, nargout, | 51 DEFUN (mgorth, args, nargout, |
52 "-*- texinfo -*-\n\ | 52 "-*- texinfo -*-\n\ |
53 @deftypefn {Built-in Function} {[@var{y}, @var{h}] =} mgorth (@var{x}, @var{v})\n\ | 53 @deftypefn {Built-in Function} {[@var{y}, @var{h}] =} mgorth (@var{x}, @var{v})\n\ |