Skip to content
Snippets Groups Projects
Commit 84dca5e5 authored by Gregor Corbin's avatar Gregor Corbin
Browse files

renamed the jacobian.mac to gaussjacobi.mac for consistency

parent bb672e95
No related branches found
No related tags found
1 merge request!154Feature: Gauss-Radau quadratures
/*
* Run `maxima --batch jacobian.mac'.
* Run `maxima --batch gaussjacobi.mac'.
*/
/* adjust search path */
......@@ -32,15 +32,15 @@ weight(n,a,b,xx) := A(n,a,b)/A(n-1,a,b)*gamma_n(n-1,a,b)/(at(ratexpand(jacobi_p(
write files
*/
write_quad("jacobi_1_0_imp.hh", "Jacobi1", "jacobian.mac",
write_quad("jacobi_1_0_imp.hh", "Jacobi1", "gaussjacobi.mac",
lambda([i],jacobi(i,1,0)),
lambda([i,p],weight(i,1,0,p)),
maxp, 0)$
write_quad("jacobi_2_0_imp.hh", "Jacobi2", "jacobian.mac",
write_quad("jacobi_2_0_imp.hh", "Jacobi2", "gaussjacobi.mac",
lambda([i],jacobi(i,2,0)),
lambda([i,p],weight(i,2,0,p)),
maxp, 0)$
write_quad("gauss_imp.hh", "Gauss", "jacobian.mac",
write_quad("gauss_imp.hh", "Gauss", "gaussjacobi.mac",
lambda([i],jacobi(i,0,0)),
lambda([i,p],weight(i,0,0,p)),
maxp, 0)$
......@@ -48,6 +48,6 @@ write_quad("gauss_imp.hh", "Gauss", "jacobian.mac",
/*
* Local variables:
* mode: maxima
* compile-command: "maxima --batch jacobian.mac"
* compile-command: "maxima --batch gaussjacobi.mac"
* End:
*/
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment