diff options
Diffstat (limited to 'src/macro/HAMADM_declare.h')
-rw-r--r-- | src/macro/HAMADM_declare.h | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/src/macro/HAMADM_declare.h b/src/macro/HAMADM_declare.h new file mode 100644 index 0000000..30a338c --- /dev/null +++ b/src/macro/HAMADM_declare.h @@ -0,0 +1,42 @@ +/*@@ + @header HAMADM_declare.h + @date Aug 98 + @author Gabrielle Allen + @desc + Declarations for macro to calculate vacuum part of Hamiltonian + constraint + + @enddesc +@@*/ + +#ifndef HAMADM_DECLARE +#define HAMADM_DECLARE + +#include "../../packages/CactusEinstein/Einstein/src/macro/TRRICCI_declare.h" +#include "../../packages/CactusEinstein/Einstein/src/macro/TRKK_declare.h" +#include "../../packages/CactusEinstein/Einstein/src/macro/TRK_declare.h" + +#ifdef FCODE + +/* Output variables */ +#undef HAMADM_HAMADM +#define HAMADM_HAMADM hamadm_ham_adm + +/* Declare output variables */ + REAL HAMADM_HAMADM + +#endif + + +#ifdef CCODE + +/* Output variables */ +#undef HAMADM_HAMADM +#define HAMADM_HAMADM hamadm_ham_adm + +/* Declare output variables */ + double HAMADM_HAMADM; + +#endif + +#endif |