Regenerate code

4 files changed, 20 insertions, 5 deletions

diff --git a/ML_ADMQuantities/interface.ccl b/ML_ADMQuantities/interface.ccl
index 6310390..905b0e8 100644
--- a/ML_ADMQuantities/interface.ccl
+++ b/ML_ADMQuantities/interface.ccl
@@ -25,7 +25,7 @@ CCTK_INT FUNCTION Boundary_SelectVarForBC(CCTK_POINTER_TO_CONST IN GH, CCTK_INT
 USES FUNCTION Boundary_SelectVarForBC
 
 public:
-CCTK_REAL ML_Jadm type=GF timelevels=3 tags='tensortypealias="D" tensorweight=1.0000000000000000000'
+CCTK_REAL ML_Jadm type=GF timelevels=3 tags='tensortypealias="D" tensorweight=1'
 {
   Jadm1,
   Jadm2,
@@ -33,7 +33,7 @@ CCTK_REAL ML_Jadm type=GF timelevels=3 tags='tensortypealias="D" tensorweight=1.
 } "ML_Jadm"
 
 public:
-CCTK_REAL ML_Madm type=GF timelevels=3 tags='tensortypealias="Scalar" tensorweight=1.0000000000000000000'
+CCTK_REAL ML_Madm type=GF timelevels=3 tags='tensortypealias="Scalar" tensorweight=1'
 {
   Madm
 } "ML_Madm"
diff --git a/ML_ADMQuantities/schedule.ccl b/ML_ADMQuantities/schedule.ccl
index b0c416a..585ae5d 100644
--- a/ML_ADMQuantities/schedule.ccl
+++ b/ML_ADMQuantities/schedule.ccl
@@ -42,7 +42,7 @@ schedule ML_ADMQuantities_CheckBoundaries at BASEGRID
   OPTIONS: meta
 } "check boundaries treatment"
 
-schedule group ApplyBCs as ML_ADMQuantities_ApplyBCs in MoL_PseudoEvolution  after ML_ADMQuantities_SelectBoundConds
+schedule group ApplyBCs as ML_ADMQuantities_ApplyBCs in MoL_PseudoEvolution after ML_ADMQuantities_SelectBoundConds
 {
   # no language specified
 } "Apply boundary conditions controlled by thorn Boundary"
diff --git a/ML_ADMQuantities/src/Boundaries.c b/ML_ADMQuantities/src/Boundaries.c
index ca87ac2..1516a7e 100644
--- a/ML_ADMQuantities/src/Boundaries.c
+++ b/ML_ADMQuantities/src/Boundaries.c
@@ -31,10 +31,10 @@ void ML_ADMQuantities_SelectBoundConds(CCTK_ARGUMENTS)
   DECLARE_CCTK_PARAMETERS;
   
   CCTK_INT ierr = 0;
-  ierr = Boundary_SelectGroupForBC (cctkGH, CCTK_ALL_FACES, 1, -1, "ML_ADMQuantities::ML_Jadm", "scalar");
+  ierr = Boundary_SelectGroupForBC (cctkGH, CCTK_ALL_FACES, boundary_width, -1, "ML_ADMQuantities::ML_Jadm", "scalar");
   if (ierr<0) CCTK_WARN (CCTK_WARN_ABORT, "Failed to select boundary condition for ML_ADMQuantities::ML_Jadm");
 
-  ierr = Boundary_SelectGroupForBC (cctkGH, CCTK_ALL_FACES, 1, -1, "ML_ADMQuantities::ML_Madm", "scalar");
+  ierr = Boundary_SelectGroupForBC (cctkGH, CCTK_ALL_FACES, boundary_width, -1, "ML_ADMQuantities::ML_Madm", "scalar");
   if (ierr<0) CCTK_WARN (CCTK_WARN_ABORT, "Failed to select boundary condition for ML_ADMQuantities::ML_Madm");
 }
 
diff --git a/ML_ADMQuantities/src/ML_ADMQuantities.c b/ML_ADMQuantities/src/ML_ADMQuantities.c
index d8344e5..3512c4b 100644
--- a/ML_ADMQuantities/src/ML_ADMQuantities.c
+++ b/ML_ADMQuantities/src/ML_ADMQuantities.c
@@ -20,6 +20,21 @@
 #define CUB(x) ((x) * (x) * (x))
 #define QAD(x) ((x) * (x) * (x) * (x))
 
+void ML_ADMQuantities_SelectBCs(CCTK_ARGUMENTS)
+{
+  DECLARE_CCTK_ARGUMENTS;
+  DECLARE_CCTK_PARAMETERS;
+  
+  CCTK_INT ierr = 0;
+  ierr = Boundary_SelectGroupForBC(cctkGH, CCTK_ALL_FACES, GenericFD_GetBoundaryWidth(cctkGH), -1 /* no table */, "ML_ADMQuantities::ML_Jadm","flat");
+  if (ierr < 0)
+    CCTK_WARN(1, "Failed to register flat BC for ML_ADMQuantities::ML_Jadm.");
+  ierr = Boundary_SelectGroupForBC(cctkGH, CCTK_ALL_FACES, GenericFD_GetBoundaryWidth(cctkGH), -1 /* no table */, "ML_ADMQuantities::ML_Madm","flat");
+  if (ierr < 0)
+    CCTK_WARN(1, "Failed to register flat BC for ML_ADMQuantities::ML_Madm.");
+  return;
+}
+
 void ML_ADMQuantities_Body(cGH const * restrict const cctkGH, int const dir, int const face, CCTK_REAL const normal[3], CCTK_REAL const tangentA[3], CCTK_REAL const tangentB[3], int const min[3], int const max[3], int const n_subblock_gfs, CCTK_REAL * restrict const subblock_gfs[])
 {
   DECLARE_CCTK_ARGUMENTS;