diff options
author | jthorn <jthorn@df1f8a13-aa1d-4dd4-9681-27ded5b42416> | 2002-08-18 15:12:49 +0000 |
---|---|---|
committer | jthorn <jthorn@df1f8a13-aa1d-4dd4-9681-27ded5b42416> | 2002-08-18 15:12:49 +0000 |
commit | 15c98b3abee2525b24ca89932256ff2cda63c9bc (patch) | |
tree | fba7c114f0b5e7ffdad3e60254fd0e8dd1e42f97 /src/GeneralizedPolynomial-Uniform/Lagrange/1d.coeffs/1d.cube.order3.smooth0/coeff-I.compute.c | |
parent | 7be0a94bec4b4e89c433e5380fce2cf84e5e0681 (diff) |
This commit reorganizes the Maple scripts which generate the interpolation
coefficients, and the coefficient files themselves, to properly support
multiple interpolation operators, and adds some skeleton support for
Hermite interpolation. I will add full support for Hermite in a future
checkin.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/LocalInterp/trunk@81 df1f8a13-aa1d-4dd4-9681-27ded5b42416
Diffstat (limited to 'src/GeneralizedPolynomial-Uniform/Lagrange/1d.coeffs/1d.cube.order3.smooth0/coeff-I.compute.c')
-rw-r--r-- | src/GeneralizedPolynomial-Uniform/Lagrange/1d.coeffs/1d.cube.order3.smooth0/coeff-I.compute.c | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/src/GeneralizedPolynomial-Uniform/Lagrange/1d.coeffs/1d.cube.order3.smooth0/coeff-I.compute.c b/src/GeneralizedPolynomial-Uniform/Lagrange/1d.coeffs/1d.cube.order3.smooth0/coeff-I.compute.c new file mode 100644 index 0000000..2df6cd1 --- /dev/null +++ b/src/GeneralizedPolynomial-Uniform/Lagrange/1d.coeffs/1d.cube.order3.smooth0/coeff-I.compute.c @@ -0,0 +1,16 @@ +fp t10, + t9, + t8, + t7, + t6, + t5; + t10 = x*x; + t9 = x*t10; + t8 = RATIONAL(-1.0,2.0); + t7 = RATIONAL(1.0,2.0); + t6 = RATIONAL(-1.0,6.0); + t5 = t7*t10; + coeff_I_m1 = RATIONAL(-1.0,3.0)*x+t5+t6*t9; + coeff_I_0 = RATIONAL(1.0,1.0)+t8*x-t10+t7*t9; + coeff_I_p1 = x+t5+t8*t9; + coeff_I_p2 = t6*x+RATIONAL(1.0,6.0)*t9; |