# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1244663626 14400
# Node ID 754f8f438a101197f0a57e01c9018692698e02b7
# Parent  22a4433b41e3153f0fc573ba4d1cef84c550ae1a
fix typo in previous change

diff -r 22a4433b41e3 -r 754f8f438a10 scripts/ChangeLog
--- a/scripts/ChangeLog	Wed Jun 10 21:27:01 2009 +0200
+++ b/scripts/ChangeLog	Wed Jun 10 15:53:46 2009 -0400
@@ -1,4 +1,4 @@
-2009-06-10  Marco Caliari <marco.caliari@univr.it>
+2009-06-10  Marco Caliari  <marco.caliari@univr.it>
 
 	* general/quadgk.m: Better waypoint transform.
 
diff -r 22a4433b41e3 -r 754f8f438a10 scripts/general/quadgk.m
--- a/scripts/general/quadgk.m	Wed Jun 10 21:27:01 2009 +0200
+++ b/scripts/general/quadgk.m	Wed Jun 10 15:53:46 2009 -0400
@@ -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)';