add missing file

git-svn-id: http://svn.einsteintoolkit.org/cactus/EinsteinBase/HydroBase/trunk@12 57fe0bb3-ccba-405f-9b23-de0201f165b7

1 files changed, 31 insertions, 0 deletions

diff --git a/src/Initialisation.c b/src/Initialisation.c
new file mode 100644
index 0000000..de2411c
--- /dev/null
+++ b/src/Initialisation.c
@@ -0,0 +1,31 @@
+#include "cctk.h"
+
+#include "cctk_Arguments.h"
+#include "cctk_Parameters.h"
+
+void HydroBase_Y_e_one(CCTK_ARGUMENTS)
+{
+  DECLARE_CCTK_ARGUMENTS;
+  DECLARE_CCTK_PARAMETERS;
+  int i;
+
+  for(i = 0; i < cctk_lsh[0]*cctk_lsh[1]*cctk_lsh[2]; i++)
+    Y_e[i] = 1.0;
+  
+  if (CCTK_ActiveTimeLevels(cctkGH, "HydroBase::Y_e") > 1)
+    for(i = 0; i < cctk_lsh[0]*cctk_lsh[1]*cctk_lsh[2]; i++)
+      Y_e_p[i] = 1.0;
+  
+  if (CCTK_ActiveTimeLevels(cctkGH, "HydroBase::Y_e") > 2)
+    for(i = 0; i < cctk_lsh[0]*cctk_lsh[1]*cctk_lsh[2]; i++)
+      Y_e_p_p[i] = 1.0;
+}
+
+/*void HydroBase_SetY_eStateOn(CCTK_ARGUMENTS)
+{
+  DECLARE_CCTK_ARGUMENTS;
+  DECLARE_CCTK_PARAMETERS;
+
+  *Y_e_state = 1;
+}*/
+