From 97e059c91be413d805441abb02cc93ba0f6387e4 Mon Sep 17 00:00:00 2001 From: jthorn Date: Wed, 28 Aug 2002 11:46:14 +0000 Subject: add Hermite interpolation functions to dispatch table git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/LocalInterp/trunk@103 df1f8a13-aa1d-4dd4-9681-27ded5b42416 --- .../InterpLocalUniform.c | 115 +++++++++++---------- .../Lagrange/make.code.defn | 5 +- 2 files changed, 61 insertions(+), 59 deletions(-) diff --git a/src/GeneralizedPolynomial-Uniform/InterpLocalUniform.c b/src/GeneralizedPolynomial-Uniform/InterpLocalUniform.c index fc8076e..3bb59c2 100644 --- a/src/GeneralizedPolynomial-Uniform/InterpLocalUniform.c +++ b/src/GeneralizedPolynomial-Uniform/InterpLocalUniform.c @@ -35,6 +35,7 @@ #include "InterpLocalUniform.h" #include "Lagrange/all_prototypes.h" +#include "Hermite/all_prototypes.h" /* the rcs ID and its dummy function to use it */ static const char *rcsid = "$Header$"; @@ -1384,7 +1385,7 @@ typedef #include "template.h" /* NULL (function) pointer of this type */ -#define NULL_INTERP_FN_PTR ((p_interp_fn_t) NULL) +#define NULL_INTERP_FN_PTR ((p_interp_fn_t) NULL) /* * For each axis of this array which is marked with a "see above" comment @@ -1407,13 +1408,13 @@ static const p_interp_fn_t p_interp_fn_table[N_INTERP_OPERATORS] /* N_dims = 0 ==> unused */ { /* molecule_family = molecule_family_cube */ - { NULL_INTERP_FN_PTR , }, /* order=0 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=1 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=2 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=3 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=4 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=5 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=6 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=0 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=1 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=2 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=3 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=4 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=5 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=6 (unused) */ }, }, @@ -1421,13 +1422,13 @@ static const p_interp_fn_t p_interp_fn_table[N_INTERP_OPERATORS] /* N_dims = 1 */ { /* molecule_family = molecule_family_cube */ - { NULL_INTERP_FN_PTR , }, /* order=0 (unused) */ - { LocalInterp_ULagrange_1dcube_10, }, /* order=1 */ - { LocalInterp_ULagrange_1dcube_20, }, /* order=2 */ - { LocalInterp_ULagrange_1dcube_30, }, /* order=3 */ - { LocalInterp_ULagrange_1dcube_40, }, /* order=4 */ - { LocalInterp_ULagrange_1dcube_50, }, /* order=5 */ - { LocalInterp_ULagrange_1dcube_60, }, /* order=6 */ + { NULL_INTERP_FN_PTR, }, /* order=0 (unused) */ + { LocalInterp_ULagrange_1dcube_10, }, /* order=1 */ + { LocalInterp_ULagrange_1dcube_20, }, /* order=2 */ + { LocalInterp_ULagrange_1dcube_30, }, /* order=3 */ + { LocalInterp_ULagrange_1dcube_40, }, /* order=4 */ + { LocalInterp_ULagrange_1dcube_50, }, /* order=5 */ + { LocalInterp_ULagrange_1dcube_60, }, /* order=6 */ }, }, @@ -1435,13 +1436,13 @@ static const p_interp_fn_t p_interp_fn_table[N_INTERP_OPERATORS] /* N_dims = 2 */ { /* molecule_family = molecule_family_cube */ - { NULL_INTERP_FN_PTR , }, /* order=0 (unused) */ - { LocalInterp_ULagrange_2dcube_10, }, /* order=1 */ - { LocalInterp_ULagrange_2dcube_20, }, /* order=2 */ - { LocalInterp_ULagrange_2dcube_30, }, /* order=3 */ - { LocalInterp_ULagrange_2dcube_40, }, /* order=4 */ - { NULL_INTERP_FN_PTR , }, /* order=5 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=6 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=0 (unused) */ + { LocalInterp_ULagrange_2dcube_10, }, /* order=1 */ + { LocalInterp_ULagrange_2dcube_20, }, /* order=2 */ + { LocalInterp_ULagrange_2dcube_30, }, /* order=3 */ + { LocalInterp_ULagrange_2dcube_40, }, /* order=4 */ + { NULL_INTERP_FN_PTR, }, /* order=5 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=6 (n.i.) */ }, }, @@ -1449,13 +1450,13 @@ static const p_interp_fn_t p_interp_fn_table[N_INTERP_OPERATORS] /* N_dims = 3 */ { /* molecule_family = molecule_family_cube */ - { NULL_INTERP_FN_PTR , }, /* order=0 (unused) */ - { LocalInterp_ULagrange_3dcube_10, }, /* order=1 */ - { LocalInterp_ULagrange_3dcube_20, }, /* order=2 */ - { LocalInterp_ULagrange_3dcube_30, }, /* order=3 */ - { LocalInterp_ULagrange_3dcube_40, }, /* order=4 */ - { NULL_INTERP_FN_PTR , }, /* order=5 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=6 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=0 (unused) */ + { LocalInterp_ULagrange_3dcube_10, }, /* order=1 */ + { LocalInterp_ULagrange_3dcube_20, }, /* order=2 */ + { LocalInterp_ULagrange_3dcube_30, }, /* order=3 */ + { LocalInterp_ULagrange_3dcube_40, }, /* order=4 */ + { NULL_INTERP_FN_PTR, }, /* order=5 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=6 (n.i.) */ }, }, @@ -1468,13 +1469,13 @@ static const p_interp_fn_t p_interp_fn_table[N_INTERP_OPERATORS] /* N_dims = 0 ==> unused */ { /* molecule_family = molecule_family_cube */ - { NULL_INTERP_FN_PTR , }, /* order=0 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=1 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=2 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=3 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=4 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=5 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=6 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=0 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=1 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=2 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=3 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=4 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=5 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=6 (unused) */ }, }, @@ -1482,13 +1483,13 @@ static const p_interp_fn_t p_interp_fn_table[N_INTERP_OPERATORS] /* N_dims = 1 */ { /* molecule_family = molecule_family_cube */ - { NULL_INTERP_FN_PTR , }, /* order=0 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=1 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=2 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=3 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=4 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=5 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=6 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=0 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=1 (unused) */ + { LocalInterp_UHermite_1dcube_2, }, /* order=2 */ + { LocalInterp_UHermite_1dcube_3, }, /* order=3 */ + { LocalInterp_UHermite_1dcube_4, }, /* order=4 */ + { NULL_INTERP_FN_PTR, }, /* order=5 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=6 (n.i.) */ }, }, @@ -1496,13 +1497,13 @@ static const p_interp_fn_t p_interp_fn_table[N_INTERP_OPERATORS] /* N_dims = 2 */ { /* molecule_family = molecule_family_cube */ - { NULL_INTERP_FN_PTR , }, /* order=0 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=1 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=2 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=3 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=4 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=5 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=6 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=0 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=1 (unused) */ + { LocalInterp_UHermite_2dcube_2, }, /* order=2 */ + { LocalInterp_UHermite_2dcube_3, }, /* order=3 */ + { NULL_INTERP_FN_PTR, }, /* order=4 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=5 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=6 (n.i.) */ }, }, @@ -1510,13 +1511,13 @@ static const p_interp_fn_t p_interp_fn_table[N_INTERP_OPERATORS] /* N_dims = 3 */ { /* molecule_family = molecule_family_cube */ - { NULL_INTERP_FN_PTR , }, /* order=0 (unused) */ - { NULL_INTERP_FN_PTR , }, /* order=1 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=2 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=3 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=4 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=5 (n.i.) */ - { NULL_INTERP_FN_PTR , }, /* order=6 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=0 (unused) */ + { NULL_INTERP_FN_PTR, }, /* order=1 (unused) */ + { LocalInterp_UHermite_3dcube_2, }, /* order=2 */ + { LocalInterp_UHermite_3dcube_3, }, /* order=3 */ + { NULL_INTERP_FN_PTR, }, /* order=4 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=5 (n.i.) */ + { NULL_INTERP_FN_PTR, }, /* order=6 (n.i.) */ }, }, diff --git a/src/GeneralizedPolynomial-Uniform/Lagrange/make.code.defn b/src/GeneralizedPolynomial-Uniform/Lagrange/make.code.defn index 468c500..c656453 100644 --- a/src/GeneralizedPolynomial-Uniform/Lagrange/make.code.defn +++ b/src/GeneralizedPolynomial-Uniform/Lagrange/make.code.defn @@ -2,7 +2,8 @@ # $Header$ # Source files in this directory -SRCS = 1d.cube.order1.smooth0.c \ +SRCS = \ + 1d.cube.order1.smooth0.c \ 1d.cube.order2.smooth0.c \ 1d.cube.order3.smooth0.c \ 1d.cube.order4.smooth0.c \ @@ -18,4 +19,4 @@ SRCS = 1d.cube.order1.smooth0.c \ 3d.cube.order2.smooth0.c \ 3d.cube.order3.smooth0.c \ 3d.cube.order4.smooth0.c \ - # end of list + # end of list -- cgit v1.2.3