aboutsummaryrefslogtreecommitdiff
path: root/src/maple/coeffs.maple
diff options
context:
space:
mode:
authorjthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5>2001-09-17 17:25:18 +0000
committerjthorn <jthorn@f88db872-0e4f-0410-b76b-b9085cfa78c5>2001-09-17 17:25:18 +0000
commit684e43484c8e17d411b0d791711b2fa08d4138b3 (patch)
tree1d351d6b975ca869d2c68d04c1df47a593b4d18e /src/maple/coeffs.maple
parentdf3041f889b89dc6832a6ab367f7c1b054802d7f (diff)
some small portability mods (run through mint)
git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinAnalysis/AHFinderDirect/trunk@355 f88db872-0e4f-0410-b76b-b9085cfa78c5
Diffstat (limited to 'src/maple/coeffs.maple')
-rw-r--r--src/maple/coeffs.maple7
1 files changed, 4 insertions, 3 deletions
diff --git a/src/maple/coeffs.maple b/src/maple/coeffs.maple
index de07b8e..123a494 100644
--- a/src/maple/coeffs.maple
+++ b/src/maple/coeffs.maple
@@ -16,12 +16,13 @@ setup_coeff_gfas :=
proc()
global
@include "coords.minc",
-@include "coeffs.minc";
+@include "coeffs.minc",
+@include "gfa.minc";
# 1st ($X^u_i$) and 2nd ($X^u_{ij}$) partial derivs
# of (r,rho,sigma) wrt (xx,yy,zz)
-make_gfa('X_ud', {inert}, [A_min..N, 1..N], none);
-make_gfa('X_udd', {inert}, [A_min..N, 1..N, 1..N], symmetric3_23);
+make_gfa('X_ud', {inert}, [1..N_ang, 1..N], none);
+make_gfa('X_udd', {inert}, [1..N_ang, 1..N, 1..N], symmetric3_23);
NULL;
end proc;