Mercurial > octave-nkf

comparison scripts/ode/private/AbsRel_Norm.m @ 20570:6256f6e366ac

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix copyright text in private ode functions * script/ode/private/*.m: Fox the copyright text.
author Carlo de Falco <carlo.defalco@polimi.it>
date Fri, 02 Oct 2015 05:50:43 +0200
parents fcb792acab9b
children 25623ef2ff4f
comparison
equal deleted inserted replaced
20569:b70cc4bd8109 20570:6256f6e366ac
1 ## Copyright (C) 2013, Roberto Porcu' <roberto.porcu@polimi.it>
2 ## Copyright (C) 2014, Jacopo Corno <jacopo.corno@gmail.com>
3 ##
4 ## This file is part of Octave.
5 ##
6 ## Octave is free software; you can redistribute it and/or modify it
7 ## under the terms of the GNU General Public License as published by
8 ## the Free Software Foundation; either version 3 of the License, or (at
9 ## your option) any later version.
10 ##
11 ## Octave is distributed in the hope that it will be useful, but
12 ## WITHOUT ANY WARRANTY; without even the implied warranty of
13 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 ## General Public License for more details.
15 ##
16 ## You should have received a copy of the GNU General Public License
17 ## along with Octave; see the file COPYING. If not, see
18 ## <http://www.gnu.org/licenses/>.
19
20
1 function res = AbsRel_Norm (x, x_old, AbsTol, RelTol, normcontrol, y) 21 function res = AbsRel_Norm (x, x_old, AbsTol, RelTol, normcontrol, y)
2 22
3 n = length (x); 23 n = length (x);
4 24
5 if (nargin == 5) 25 if (nargin == 5)