1 files changed, 52 insertions, 0 deletions
diff --git a/schedule.ccl b/schedule.ccl
new file mode 100644
index 0000000..09adf9c
--- /dev/null
+++ b/schedule.ccl
@@ -0,0 +1,52 @@
+# Schedule definitions for thorn ADMBase
+# $Header$
+
+STORAGE: metric[1], curv[1], lapse[1]
+
+# Initial data for the spatial slices
+
+if(CCTK_Equals(initial_data, "Cartesian Minkowski"))
+{
+  SCHEDULE ADMBase_CartesianMinkowsi at CCTK_INITIAL
+  {	
+    LANG: C
+  } "Set the metric and extrinsic curvature to cartesian minkowski values"
+}
+
+# Initial data for the lapse
+
+if(CCTK_Equals(initial_lapse, "one"))
+{
+  SCHEDULE ADMBase_LapseOne at CCTK_INITIAL
+  {	
+    LANG: C
+  } "Set the lapse to 1 at all points"
+}
+
+# Do we have storage for the shift ?
+if (!CCTK_Equals(initial_shift,"none")) 
+{
+  STORAGE: shift[1]
+
+  SCHEDULE ADMBase_SetShiftStateOn at CCTK_BASEGRID
+  {	
+    LANG: C
+  } "Set the shift_state variable to 1"
+}
+else
+{
+  SCHEDULE ADMBase_SetShiftStateOff at CCTK_BASEGRID
+  {	
+    LANG: C
+  } "Set the shift_state variable to 0"
+}
+
+# Initial data for the shift
+
+if(CCTK_Equals(initial_shift, "zero"))
+{
+  SCHEDULE ADMBase_ShiftZero at CCTK_INITIAL
+  {	
+    LANG: C
+  } "Set the shift to 0 at all points"
+}