1 files changed, 25 insertions, 0 deletions
diff --git a/src/ZeroTmunu.F90 b/src/ZeroTmunu.F90
new file mode 100644
index 0000000..c99b169
--- /dev/null
+++ b/src/ZeroTmunu.F90
@@ -0,0 +1,25 @@
+#include "cctk.h"
+#include "cctk_Arguments.h"
+
+
+      
+! Initialise Tmunu to zero
+
+subroutine TmunuBase_ZeroTmunu (CCTK_ARGUMENTS)
+  implicit none
+  DECLARE_CCTK_ARGUMENTS
+  
+  eTtt = 0
+  
+  eTtx = 0
+  eTty = 0
+  eTtz = 0
+  
+  eTxx = 0
+  eTxy = 0
+  eTxz = 0
+  eTyy = 0
+  eTyz = 0
+  eTzz = 0
+  
+end subroutine TmunuBase_ZeroTmunu