diff options
Diffstat (limited to 'src/macro/WAVEG_declare.h')
-rw-r--r-- | src/macro/WAVEG_declare.h | 56 |
1 files changed, 56 insertions, 0 deletions
diff --git a/src/macro/WAVEG_declare.h b/src/macro/WAVEG_declare.h new file mode 100644 index 0000000..811aa40 --- /dev/null +++ b/src/macro/WAVEG_declare.h @@ -0,0 +1,56 @@ +/*@@ + @header WAVEG_declare.h + @date Nov 98 + @author Gabrielle Allen + @desc + Macro to calculate wave operator acting on the metric + + That is g^lm g_ij,lm + + @enddesc +@@*/ + +#ifndef WAVEG_DECLARE +#define WAVEG_DECLARE + +#include "../../packages/CactusEinstein/Einstein/src/macro/UPPERMET_declare.h" +#include "../../packages/CactusEinstein/Einstein/src/macro/DDG_declare.h" + +/* Output variables */ +#undef WAVEG_DDGXX +#define WAVEG_DDGXX waveg_ddgxx +#undef WAVEG_DDGXY +#define WAVEG_DDGXY waveg_ddgxy +#undef WAVEG_DDGXZ +#define WAVEG_DDGXZ waveg_ddgxz +#undef WAVEG_DDGYY +#define WAVEG_DDGYY waveg_ddgyy +#undef WAVEG_DDGYZ +#define WAVEG_DDGYZ waveg_ddgyz +#undef WAVEG_DDGZZ +#define WAVEG_DDGZZ waveg_ddgzz + +#ifdef FCODE + + REAL WAVEG_DDGXX + REAL WAVEG_DDGXY + REAL WAVEG_DDGXZ + REAL WAVEG_DDGYY + REAL WAVEG_DDGYZ + REAL WAVEG_DDGZZ + +#endif + +#ifdef CCODE + + double WAVEG_DDGXX + double WAVEG_DDGXY + double WAVEG_DDGXZ + double WAVEG_DDGYY + double WAVEG_DDGYZ + double WAVEG_DDGZZ + +#endif + +#endif + |