aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Carpet/Carpet/interface.ccl3
-rw-r--r--Carpet/Carpet/src/carpet_public.h1
-rw-r--r--Carpet/Carpet/src/helpers.cc5
3 files changed, 9 insertions, 0 deletions
diff --git a/Carpet/Carpet/interface.ccl b/Carpet/Carpet/interface.ccl
index 07e0b33d6..fe70cb5af 100644
--- a/Carpet/Carpet/interface.ccl
+++ b/Carpet/Carpet/interface.ccl
@@ -40,6 +40,9 @@ PROVIDES FUNCTION GetMPICommWorld WITH Carpet_GetMPICommWorld LANGUAGE C
CCTK_INT FUNCTION EnableProlongating(CCTK_INT IN flag)
PROVIDES FUNCTION EnableProlongating WITH CarpetEnableProlongating LANGUAGE C
+CCTK_INT FUNCTION QueryProlongating()
+PROVIDES FUNCTION QueryProlongating WITH CarpetQueryProlongating LANGUAGE C
+
# The location of the boundary points
diff --git a/Carpet/Carpet/src/carpet_public.h b/Carpet/Carpet/src/carpet_public.h
index 135166035..2beccfcd6 100644
--- a/Carpet/Carpet/src/carpet_public.h
+++ b/Carpet/Carpet/src/carpet_public.h
@@ -75,6 +75,7 @@ namespace Carpet {
/* Prolongation management */
CCTK_INT CarpetEnableProlongating (const CCTK_INT flag);
+ CCTK_INT CarpetQueryProlongating ();
diff --git a/Carpet/Carpet/src/helpers.cc b/Carpet/Carpet/src/helpers.cc
index 57b462be1..2edfc6c54 100644
--- a/Carpet/Carpet/src/helpers.cc
+++ b/Carpet/Carpet/src/helpers.cc
@@ -46,6 +46,11 @@ namespace Carpet {
return 0;
}
+ CCTK_INT CarpetQueryProlongating ()
+ {
+ return do_prolongate;
+ }
+
// Multi-Model