Add the c_norm function and l2_project functions.

[octave.git] / legendre_p.m

diff --git a/legendre_p.m b/legendre_p.m
index 6238929eb2e4aea13ea1cc1548b82dcc59fdb301..276e7407d39f2d410dd38439f389891b11993b8d 100644 (file)
--- a/legendre_p.m
+++ b/legendre_p.m
@@ -14,14 +14,14 @@ function P = legendre_p(n)
     P = NA;
   elseif (n == 0)
     ## One of our base cases.
-    P = @(x) 1
+    P = @(x) 1;
   elseif (n == 1)
     ## The second base case.
-    P = @(x) x
+    P = @(x) x;
   else
     ## Compute recursively.
-    prev = legendre_p(n-1)
-    prev_prev = legendre_p(n-2)
-    P = @(x) (1/n)*( (2*n - 1)*prev(x) - (n-1)*prev_prev(x) )
+    prev = legendre_p(n-1);
+    prev_prev = legendre_p(n-2);
+    P = @(x) (1/n).*( (2*n - 1).*x.*prev(x) - (n-1).*prev_prev(x) );
   end
 end