hajoitus

src/equations.jl

@@ -50,6 +50,15 @@ function get_detJ(el::Element, ip::IntegrationPoint)
         return det(J)
     end
 end
+function get_detJ(el::Element, xi::Vector)
+    J = get_Jacobian(el, xi)
+    n, m = size(J)
+    if n != m # for manifolds
+        return norm(J)
+    else
+        return det(J)
+    end
+end
 
 """
 Integrate f over element

src/hierarchical.jl

@@ -29,7 +29,7 @@ end
 Return derivative of Legendgre polynomial of order n to inverval ξ ∈  [-1, 1]
 """
 function get_legendre_polynomial_derivative(n::Int)
-    dP(xi) = 2^n*sum([k*xi.^(k-1)*bin(n, k)*bin(1/2*(n+k-1), n) for k=0:n])
+    dP(xi) = 2^n*sum([k*xi.^(k-1)*bin(n, k)*bin(1/2*(n+k-1), n) for k=1:n])
     dP
 end