summaryrefslogtreecommitdiff
path: root/interface.ccl
diff options
context:
space:
mode:
authorAnton Khirnov <anton@khirnov.net>2018-09-25 10:02:18 +0200
committerAnton Khirnov <anton@khirnov.net>2018-09-25 10:03:50 +0200
commit8ee77841e5d32d3243213730e6d12a880200d840 (patch)
tree04a8df87aa488d97cf1ae039a35dfd6a2f4e1777 /interface.ccl
parentecae7b1fa0058adcaa61b324b9d7248c7b5d3ef9 (diff)
Rewrite using a new method.
Based on 'Adaptive mesh refinement for coupled elliptic-hyperbolic problems' by Pretorius and Choptuik, 2006.
Diffstat (limited to 'interface.ccl')
-rw-r--r--interface.ccl8
1 files changed, 8 insertions, 0 deletions
diff --git a/interface.ccl b/interface.ccl
index 43e512c..124823e 100644
--- a/interface.ccl
+++ b/interface.ccl
@@ -13,3 +13,11 @@ USES FUNCTION MoLNumIntegratorSubsteps
REQUIRES FUNCTION MoLRegisterConstrained
REQUIRES FUNCTION MoLRegisterSaveAndRestore
REQUIRES FUNCTION MoLRegisterSaveAndRestoreGroup
+
+public:
+REAL lapse_mg TYPE=GF TIMELEVELS=2
+REAL lapse_mg_eval TYPE=GF tags='Prolongation="None"'
+REAL lapse_prev0 TYPE=GF tags='Prolongation="None"'
+REAL lapse_prev1 TYPE=GF tags='Prolongation="None"'
+REAL lapse_prev0_time TYPE=ARRAY DIM=1 SIZE=32
+REAL lapse_prev1_time TYPE=ARRAY DIM=1 SIZE=32