diff options
Diffstat (limited to 'ML_BSSN_Helper/src/ExtrapolateGammas.c')
-rw-r--r-- | ML_BSSN_Helper/src/ExtrapolateGammas.c | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/ML_BSSN_Helper/src/ExtrapolateGammas.c b/ML_BSSN_Helper/src/ExtrapolateGammas.c new file mode 100644 index 0000000..4e52e8f --- /dev/null +++ b/ML_BSSN_Helper/src/ExtrapolateGammas.c @@ -0,0 +1,29 @@ +#include <cctk.h> +#include <cctk_Arguments.h> + +static void +extrap (cGH const * restrict cctkGH, + CCTK_REAL * restrict var); + +void +ML_BSSN_ExtrapolateGammas (CCTK_ARGUMENTS) +{ + DECLARE_CCTK_ARGUMENTS; + + extrap (cctkGH, Xt1); + extrap (cctkGH, Xt2); + extrap (cctkGH, Xt3); + + extrap (cctkGH, A); + + extrap (cctkGH, B1); + extrap (cctkGH, B2); + extrap (cctkGH, B3); +} + +static void +extrap (cGH const * restrict const cctkGH, + CCTK_REAL * restrict const var) +{ + ExtrapolateGammas (cctkGH, var); +} |