# HG changeset patch # User John W. Eaton # Date 1244697199 -7200 # Node ID bdc383a457fbe626d720478cfc3a100ffc2dc2fc # Parent b4986fecdc53a20432535f33a75d0fa341b2e0e4 fix typo in previous change diff -r b4986fecdc53 -r bdc383a457fb scripts/ChangeLog --- a/scripts/ChangeLog Thu Jun 11 07:13:19 2009 +0200 +++ b/scripts/ChangeLog Thu Jun 11 07:13:19 2009 +0200 @@ -1,4 +1,4 @@ -2009-06-10 Marco Caliari +2009-06-10 Marco Caliari * general/quadgk.m: Better waypoint transform. diff -r b4986fecdc53 -r bdc383a457fb scripts/general/quadgk.m --- a/scripts/general/quadgk.m Thu Jun 11 07:13:19 2009 +0200 +++ b/scripts/general/quadgk.m Thu Jun 11 07:13:19 2009 +0200 @@ -195,7 +195,7 @@ ## waypoint transform is then ## t = (2 * g(t)) ./ (1 + sqrt(1 + 4 * g(t) .^ 2)) if (!isempty (waypoints)) - trans = @(x) (2 * x) ./ ((1 + sqrt(1 + 4 * x .^ 2)); + trans = @(x) (2 * x) ./ (1 + sqrt(1 + 4 * x .^ 2)); subs = [-1; trans(waypoints); 1]; else subs = linspace (-1, 1, 11)';