added the Einstien macros.

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinBase/ADMMacros/trunk@2 b1d164ef-f17a-46e7-89d4-021c7118ef4e

1 files changed, 36 insertions, 0 deletions

diff --git a/src/macro/NABA_declare.h b/src/macro/NABA_declare.h
new file mode 100644
index 0000000..9cebbe6
--- /dev/null
+++ b/src/macro/NABA_declare.h
@@ -0,0 +1,36 @@
+/*@@
+  @header   NABA_declare.h
+  @date     Jul 98
+  @author   Gabrielle Allen
+  @desc
+  Declarations for macro to calculate the nabla operator acting on the lapse
+
+  That is alpha_i^i
+  @enddesc
+@@*/
+
+#ifndef NABA_DECLARE
+#define NABA_DECLARE
+
+#include "../../packages/CactusEinstein/Einstein/src/macro/UPPERMET_declare.h"
+#include "../../packages/CactusEinstein/Einstein/src/macro/CDCDA_declare.h"
+
+/* Output variables */ 
+#undef  NABA_NABA
+#define NABA_NABA naba_naba
+
+#ifdef FCODE
+
+/* Declare output variables */
+      REAL NABA_NABA
+
+#endif
+
+#ifdef CCODE
+
+/* Declare output variables */
+      double  NABA_NABA;
+
+#endif
+
+#endif