Regenerate code (Kranc commit b0019939fb9ef98a05431967a4cc2139f0f2a1e4)

Mark automatically-generated variables as unused to avoid warnings

4 files changed, 392 insertions, 367 deletions

diff --git a/ML_ADMConstraints/src/Boundaries.cc b/ML_ADMConstraints/src/Boundaries.cc
index 0d4892d..5eecea1 100644
--- a/ML_ADMConstraints/src/Boundaries.cc
+++ b/ML_ADMConstraints/src/Boundaries.cc
@@ -30,7 +30,7 @@ extern "C" void ML_ADMConstraints_SelectBoundConds(CCTK_ARGUMENTS)
   DECLARE_CCTK_ARGUMENTS;
   DECLARE_CCTK_PARAMETERS;
   
-  CCTK_INT ierr = 0;
+  CCTK_INT ierr CCTK_ATTRIBUTE_UNUSED  = 0;
   return;
 }
 
diff --git a/ML_ADMConstraints/src/ML_ADMConstraints.cc b/ML_ADMConstraints/src/ML_ADMConstraints.cc
index ed98b4f..e0ce995 100644
--- a/ML_ADMConstraints/src/ML_ADMConstraints.cc
+++ b/ML_ADMConstraints/src/ML_ADMConstraints.cc
@@ -27,7 +27,7 @@ extern "C" void ML_ADMConstraints_SelectBCs(CCTK_ARGUMENTS)
   DECLARE_CCTK_ARGUMENTS;
   DECLARE_CCTK_PARAMETERS;
   
-  CCTK_INT ierr = 0;
+  CCTK_INT ierr CCTK_ATTRIBUTE_UNUSED  = 0;
   ierr = Boundary_SelectGroupForBC(cctkGH, CCTK_ALL_FACES, GenericFD_GetBoundaryWidth(cctkGH), -1 /* no table */, "ML_ADMConstraints::ML_Ham","flat");
   if (ierr < 0)
     CCTK_WARN(1, "Failed to register flat BC for ML_ADMConstraints::ML_Ham.");
@@ -46,39 +46,39 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
   /* Include user-supplied include files */
   
   /* Initialise finite differencing variables */
-  ptrdiff_t const di = 1;
-  ptrdiff_t const dj = CCTK_GFINDEX3D(cctkGH,0,1,0) - CCTK_GFINDEX3D(cctkGH,0,0,0);
-  ptrdiff_t const dk = CCTK_GFINDEX3D(cctkGH,0,0,1) - CCTK_GFINDEX3D(cctkGH,0,0,0);
-  ptrdiff_t const cdi = sizeof(CCTK_REAL) * di;
-  ptrdiff_t const cdj = sizeof(CCTK_REAL) * dj;
-  ptrdiff_t const cdk = sizeof(CCTK_REAL) * dk;
-  CCTK_REAL const dx = ToReal(CCTK_DELTA_SPACE(0));
-  CCTK_REAL const dy = ToReal(CCTK_DELTA_SPACE(1));
-  CCTK_REAL const dz = ToReal(CCTK_DELTA_SPACE(2));
-  CCTK_REAL const dt = ToReal(CCTK_DELTA_TIME);
-  CCTK_REAL const t = ToReal(cctk_time);
-  CCTK_REAL const dxi = INV(dx);
-  CCTK_REAL const dyi = INV(dy);
-  CCTK_REAL const dzi = INV(dz);
-  CCTK_REAL const khalf = 0.5;
-  CCTK_REAL const kthird = 1/3.0;
-  CCTK_REAL const ktwothird = 2.0/3.0;
-  CCTK_REAL const kfourthird = 4.0/3.0;
-  CCTK_REAL const keightthird = 8.0/3.0;
-  CCTK_REAL const hdxi = 0.5 * dxi;
-  CCTK_REAL const hdyi = 0.5 * dyi;
-  CCTK_REAL const hdzi = 0.5 * dzi;
+  ptrdiff_t const di CCTK_ATTRIBUTE_UNUSED  = 1;
+  ptrdiff_t const dj CCTK_ATTRIBUTE_UNUSED  = CCTK_GFINDEX3D(cctkGH,0,1,0) - CCTK_GFINDEX3D(cctkGH,0,0,0);
+  ptrdiff_t const dk CCTK_ATTRIBUTE_UNUSED  = CCTK_GFINDEX3D(cctkGH,0,0,1) - CCTK_GFINDEX3D(cctkGH,0,0,0);
+  ptrdiff_t const cdi CCTK_ATTRIBUTE_UNUSED  = sizeof(CCTK_REAL) * di;
+  ptrdiff_t const cdj CCTK_ATTRIBUTE_UNUSED  = sizeof(CCTK_REAL) * dj;
+  ptrdiff_t const cdk CCTK_ATTRIBUTE_UNUSED  = sizeof(CCTK_REAL) * dk;
+  CCTK_REAL const dx CCTK_ATTRIBUTE_UNUSED  = ToReal(CCTK_DELTA_SPACE(0));
+  CCTK_REAL const dy CCTK_ATTRIBUTE_UNUSED  = ToReal(CCTK_DELTA_SPACE(1));
+  CCTK_REAL const dz CCTK_ATTRIBUTE_UNUSED  = ToReal(CCTK_DELTA_SPACE(2));
+  CCTK_REAL const dt CCTK_ATTRIBUTE_UNUSED  = ToReal(CCTK_DELTA_TIME);
+  CCTK_REAL const t CCTK_ATTRIBUTE_UNUSED  = ToReal(cctk_time);
+  CCTK_REAL const dxi CCTK_ATTRIBUTE_UNUSED  = INV(dx);
+  CCTK_REAL const dyi CCTK_ATTRIBUTE_UNUSED  = INV(dy);
+  CCTK_REAL const dzi CCTK_ATTRIBUTE_UNUSED  = INV(dz);
+  CCTK_REAL const khalf CCTK_ATTRIBUTE_UNUSED  = 0.5;
+  CCTK_REAL const kthird CCTK_ATTRIBUTE_UNUSED  = 1/3.0;
+  CCTK_REAL const ktwothird CCTK_ATTRIBUTE_UNUSED  = 2.0/3.0;
+  CCTK_REAL const kfourthird CCTK_ATTRIBUTE_UNUSED  = 4.0/3.0;
+  CCTK_REAL const keightthird CCTK_ATTRIBUTE_UNUSED  = 8.0/3.0;
+  CCTK_REAL const hdxi CCTK_ATTRIBUTE_UNUSED  = 0.5 * dxi;
+  CCTK_REAL const hdyi CCTK_ATTRIBUTE_UNUSED  = 0.5 * dyi;
+  CCTK_REAL const hdzi CCTK_ATTRIBUTE_UNUSED  = 0.5 * dzi;
   
   /* Initialize predefined quantities */
-  CCTK_REAL const p1o12dx = 0.0833333333333333333333333333333*INV(dx);
-  CCTK_REAL const p1o12dy = 0.0833333333333333333333333333333*INV(dy);
-  CCTK_REAL const p1o12dz = 0.0833333333333333333333333333333*INV(dz);
-  CCTK_REAL const p1o144dxdy = 0.00694444444444444444444444444444*INV(dx*dy);
-  CCTK_REAL const p1o144dxdz = 0.00694444444444444444444444444444*INV(dx*dz);
-  CCTK_REAL const p1o144dydz = 0.00694444444444444444444444444444*INV(dy*dz);
-  CCTK_REAL const pm1o12dx2 = -0.0833333333333333333333333333333*INV(SQR(dx));
-  CCTK_REAL const pm1o12dy2 = -0.0833333333333333333333333333333*INV(SQR(dy));
-  CCTK_REAL const pm1o12dz2 = -0.0833333333333333333333333333333*INV(SQR(dz));
+  CCTK_REAL const p1o12dx CCTK_ATTRIBUTE_UNUSED  = 0.0833333333333333333333333333333*INV(dx);
+  CCTK_REAL const p1o12dy CCTK_ATTRIBUTE_UNUSED  = 0.0833333333333333333333333333333*INV(dy);
+  CCTK_REAL const p1o12dz CCTK_ATTRIBUTE_UNUSED  = 0.0833333333333333333333333333333*INV(dz);
+  CCTK_REAL const p1o144dxdy CCTK_ATTRIBUTE_UNUSED  = 0.00694444444444444444444444444444*INV(dx*dy);
+  CCTK_REAL const p1o144dxdz CCTK_ATTRIBUTE_UNUSED  = 0.00694444444444444444444444444444*INV(dx*dz);
+  CCTK_REAL const p1o144dydz CCTK_ATTRIBUTE_UNUSED  = 0.00694444444444444444444444444444*INV(dy*dz);
+  CCTK_REAL const pm1o12dx2 CCTK_ATTRIBUTE_UNUSED  = -0.0833333333333333333333333333333*INV(SQR(dx));
+  CCTK_REAL const pm1o12dy2 CCTK_ATTRIBUTE_UNUSED  = -0.0833333333333333333333333333333*INV(SQR(dy));
+  CCTK_REAL const pm1o12dz2 CCTK_ATTRIBUTE_UNUSED  = -0.0833333333333333333333333333333*INV(SQR(dz));
   
   /* Jacobian variable pointers */
   bool const use_jacobian = (!CCTK_IsFunctionAliased("MultiPatch_GetMap") || MultiPatch_GetMap(cctkGH) != jacobian_identity_map)
@@ -92,38 +92,38 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
   if (use_jacobian) GenericFD_GroupDataPointers(cctkGH, jacobian_group,
                                                 9, jacobian_ptrs);
   
-  CCTK_REAL const *restrict const J11 = use_jacobian ? jacobian_ptrs[0] : 0;
-  CCTK_REAL const *restrict const J12 = use_jacobian ? jacobian_ptrs[1] : 0;
-  CCTK_REAL const *restrict const J13 = use_jacobian ? jacobian_ptrs[2] : 0;
-  CCTK_REAL const *restrict const J21 = use_jacobian ? jacobian_ptrs[3] : 0;
-  CCTK_REAL const *restrict const J22 = use_jacobian ? jacobian_ptrs[4] : 0;
-  CCTK_REAL const *restrict const J23 = use_jacobian ? jacobian_ptrs[5] : 0;
-  CCTK_REAL const *restrict const J31 = use_jacobian ? jacobian_ptrs[6] : 0;
-  CCTK_REAL const *restrict const J32 = use_jacobian ? jacobian_ptrs[7] : 0;
-  CCTK_REAL const *restrict const J33 = use_jacobian ? jacobian_ptrs[8] : 0;
+  CCTK_REAL const *restrict const J11 CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_ptrs[0] : 0;
+  CCTK_REAL const *restrict const J12 CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_ptrs[1] : 0;
+  CCTK_REAL const *restrict const J13 CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_ptrs[2] : 0;
+  CCTK_REAL const *restrict const J21 CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_ptrs[3] : 0;
+  CCTK_REAL const *restrict const J22 CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_ptrs[4] : 0;
+  CCTK_REAL const *restrict const J23 CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_ptrs[5] : 0;
+  CCTK_REAL const *restrict const J31 CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_ptrs[6] : 0;
+  CCTK_REAL const *restrict const J32 CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_ptrs[7] : 0;
+  CCTK_REAL const *restrict const J33 CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_ptrs[8] : 0;
   
-  CCTK_REAL const *restrict jacobian_derivative_ptrs[18];
+  CCTK_REAL const *restrict jacobian_derivative_ptrs[18] CCTK_ATTRIBUTE_UNUSED;
   if (use_jacobian) GenericFD_GroupDataPointers(cctkGH, jacobian_derivative_group,
                                                 18, jacobian_derivative_ptrs);
   
-  CCTK_REAL const *restrict const dJ111 = use_jacobian ? jacobian_derivative_ptrs[0] : 0;
-  CCTK_REAL const *restrict const dJ112 = use_jacobian ? jacobian_derivative_ptrs[1] : 0;
-  CCTK_REAL const *restrict const dJ113 = use_jacobian ? jacobian_derivative_ptrs[2] : 0;
-  CCTK_REAL const *restrict const dJ122 = use_jacobian ? jacobian_derivative_ptrs[3] : 0;
-  CCTK_REAL const *restrict const dJ123 = use_jacobian ? jacobian_derivative_ptrs[4] : 0;
-  CCTK_REAL const *restrict const dJ133 = use_jacobian ? jacobian_derivative_ptrs[5] : 0;
-  CCTK_REAL const *restrict const dJ211 = use_jacobian ? jacobian_derivative_ptrs[6] : 0;
-  CCTK_REAL const *restrict const dJ212 = use_jacobian ? jacobian_derivative_ptrs[7] : 0;
-  CCTK_REAL const *restrict const dJ213 = use_jacobian ? jacobian_derivative_ptrs[8] : 0;
-  CCTK_REAL const *restrict const dJ222 = use_jacobian ? jacobian_derivative_ptrs[9] : 0;
-  CCTK_REAL const *restrict const dJ223 = use_jacobian ? jacobian_derivative_ptrs[10] : 0;
-  CCTK_REAL const *restrict const dJ233 = use_jacobian ? jacobian_derivative_ptrs[11] : 0;
-  CCTK_REAL const *restrict const dJ311 = use_jacobian ? jacobian_derivative_ptrs[12] : 0;
-  CCTK_REAL const *restrict const dJ312 = use_jacobian ? jacobian_derivative_ptrs[13] : 0;
-  CCTK_REAL const *restrict const dJ313 = use_jacobian ? jacobian_derivative_ptrs[14] : 0;
-  CCTK_REAL const *restrict const dJ322 = use_jacobian ? jacobian_derivative_ptrs[15] : 0;
-  CCTK_REAL const *restrict const dJ323 = use_jacobian ? jacobian_derivative_ptrs[16] : 0;
-  CCTK_REAL const *restrict const dJ333 = use_jacobian ? jacobian_derivative_ptrs[17] : 0;
+  CCTK_REAL const *restrict const dJ111  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[0] : 0;
+  CCTK_REAL const *restrict const dJ112  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[1] : 0;
+  CCTK_REAL const *restrict const dJ113  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[2] : 0;
+  CCTK_REAL const *restrict const dJ122  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[3] : 0;
+  CCTK_REAL const *restrict const dJ123  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[4] : 0;
+  CCTK_REAL const *restrict const dJ133  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[5] : 0;
+  CCTK_REAL const *restrict const dJ211  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[6] : 0;
+  CCTK_REAL const *restrict const dJ212  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[7] : 0;
+  CCTK_REAL const *restrict const dJ213  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[8] : 0;
+  CCTK_REAL const *restrict const dJ222  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[9] : 0;
+  CCTK_REAL const *restrict const dJ223  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[10] : 0;
+  CCTK_REAL const *restrict const dJ233  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[11] : 0;
+  CCTK_REAL const *restrict const dJ311  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[12] : 0;
+  CCTK_REAL const *restrict const dJ312  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[13] : 0;
+  CCTK_REAL const *restrict const dJ313  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[14] : 0;
+  CCTK_REAL const *restrict const dJ322  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[15] : 0;
+  CCTK_REAL const *restrict const dJ323  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[16] : 0;
+  CCTK_REAL const *restrict const dJ333  CCTK_ATTRIBUTE_UNUSED = use_jacobian ? jacobian_derivative_ptrs[17] : 0;
   
   /* Assign local copies of arrays functions */
   
@@ -139,28 +139,28 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
     i,j,k, imin[0],imin[1],imin[2], imax[0],imax[1],imax[2],
     cctk_ash[0],cctk_ash[1],cctk_ash[2])
   {
-    ptrdiff_t const index = di*i + dj*j + dk*k;
+    ptrdiff_t const index CCTK_ATTRIBUTE_UNUSED  = di*i + dj*j + dk*k;
     
     /* Assign local copies of grid functions */
     
-    CCTK_REAL alpL = alp[index];
-    CCTK_REAL betaxL = betax[index];
-    CCTK_REAL betayL = betay[index];
-    CCTK_REAL betazL = betaz[index];
-    CCTK_REAL gxxL = gxx[index];
-    CCTK_REAL gxyL = gxy[index];
-    CCTK_REAL gxzL = gxz[index];
-    CCTK_REAL gyyL = gyy[index];
-    CCTK_REAL gyzL = gyz[index];
-    CCTK_REAL gzzL = gzz[index];
-    CCTK_REAL kxxL = kxx[index];
-    CCTK_REAL kxyL = kxy[index];
-    CCTK_REAL kxzL = kxz[index];
-    CCTK_REAL kyyL = kyy[index];
-    CCTK_REAL kyzL = kyz[index];
-    CCTK_REAL kzzL = kzz[index];
+    CCTK_REAL alpL CCTK_ATTRIBUTE_UNUSED = alp[index];
+    CCTK_REAL betaxL CCTK_ATTRIBUTE_UNUSED = betax[index];
+    CCTK_REAL betayL CCTK_ATTRIBUTE_UNUSED = betay[index];
+    CCTK_REAL betazL CCTK_ATTRIBUTE_UNUSED = betaz[index];
+    CCTK_REAL gxxL CCTK_ATTRIBUTE_UNUSED = gxx[index];
+    CCTK_REAL gxyL CCTK_ATTRIBUTE_UNUSED = gxy[index];
+    CCTK_REAL gxzL CCTK_ATTRIBUTE_UNUSED = gxz[index];
+    CCTK_REAL gyyL CCTK_ATTRIBUTE_UNUSED = gyy[index];
+    CCTK_REAL gyzL CCTK_ATTRIBUTE_UNUSED = gyz[index];
+    CCTK_REAL gzzL CCTK_ATTRIBUTE_UNUSED = gzz[index];
+    CCTK_REAL kxxL CCTK_ATTRIBUTE_UNUSED = kxx[index];
+    CCTK_REAL kxyL CCTK_ATTRIBUTE_UNUSED = kxy[index];
+    CCTK_REAL kxzL CCTK_ATTRIBUTE_UNUSED = kxz[index];
+    CCTK_REAL kyyL CCTK_ATTRIBUTE_UNUSED = kyy[index];
+    CCTK_REAL kyzL CCTK_ATTRIBUTE_UNUSED = kyz[index];
+    CCTK_REAL kzzL CCTK_ATTRIBUTE_UNUSED = kzz[index];
     
-    CCTK_REAL eTttL, eTtxL, eTtyL, eTtzL, eTxxL, eTxyL, eTxzL, eTyyL, eTyzL, eTzzL;
+    CCTK_REAL eTttL, eTtxL, eTtyL, eTtzL, eTxxL, eTxyL, eTxzL, eTyyL, eTyzL, eTzzL CCTK_ATTRIBUTE_UNUSED ;
     
     if (*stress_energy_state)
     {
@@ -189,7 +189,7 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
       eTzzL = ToReal(0.0);
     }
     
-    CCTK_REAL dJ111L, dJ112L, dJ113L, dJ122L, dJ123L, dJ133L, dJ211L, dJ212L, dJ213L, dJ222L, dJ223L, dJ233L, dJ311L, dJ312L, dJ313L, dJ322L, dJ323L, dJ333L, J11L, J12L, J13L, J21L, J22L, J23L, J31L, J32L, J33L;
+    CCTK_REAL dJ111L, dJ112L, dJ113L, dJ122L, dJ123L, dJ133L, dJ211L, dJ212L, dJ213L, dJ222L, dJ223L, dJ233L, dJ311L, dJ312L, dJ313L, dJ322L, dJ323L, dJ333L, J11L, J12L, J13L, J21L, J22L, J23L, J31L, J32L, J33L CCTK_ATTRIBUTE_UNUSED ;
     
     if (use_jacobian)
     {
@@ -225,158 +225,158 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
     /* Include user supplied include files */
     
     /* Precompute derivatives */
-    CCTK_REAL const PDstandardNth1gxx = PDstandardNth1(&gxx[index]);
-    CCTK_REAL const PDstandardNth2gxx = PDstandardNth2(&gxx[index]);
-    CCTK_REAL const PDstandardNth3gxx = PDstandardNth3(&gxx[index]);
-    CCTK_REAL const PDstandardNth11gxx = PDstandardNth11(&gxx[index]);
-    CCTK_REAL const PDstandardNth22gxx = PDstandardNth22(&gxx[index]);
-    CCTK_REAL const PDstandardNth33gxx = PDstandardNth33(&gxx[index]);
-    CCTK_REAL const PDstandardNth12gxx = PDstandardNth12(&gxx[index]);
-    CCTK_REAL const PDstandardNth13gxx = PDstandardNth13(&gxx[index]);
-    CCTK_REAL const PDstandardNth23gxx = PDstandardNth23(&gxx[index]);
-    CCTK_REAL const PDstandardNth1gxy = PDstandardNth1(&gxy[index]);
-    CCTK_REAL const PDstandardNth2gxy = PDstandardNth2(&gxy[index]);
-    CCTK_REAL const PDstandardNth3gxy = PDstandardNth3(&gxy[index]);
-    CCTK_REAL const PDstandardNth11gxy = PDstandardNth11(&gxy[index]);
-    CCTK_REAL const PDstandardNth22gxy = PDstandardNth22(&gxy[index]);
-    CCTK_REAL const PDstandardNth33gxy = PDstandardNth33(&gxy[index]);
-    CCTK_REAL const PDstandardNth12gxy = PDstandardNth12(&gxy[index]);
-    CCTK_REAL const PDstandardNth13gxy = PDstandardNth13(&gxy[index]);
-    CCTK_REAL const PDstandardNth23gxy = PDstandardNth23(&gxy[index]);
-    CCTK_REAL const PDstandardNth1gxz = PDstandardNth1(&gxz[index]);
-    CCTK_REAL const PDstandardNth2gxz = PDstandardNth2(&gxz[index]);
-    CCTK_REAL const PDstandardNth3gxz = PDstandardNth3(&gxz[index]);
-    CCTK_REAL const PDstandardNth11gxz = PDstandardNth11(&gxz[index]);
-    CCTK_REAL const PDstandardNth22gxz = PDstandardNth22(&gxz[index]);
-    CCTK_REAL const PDstandardNth33gxz = PDstandardNth33(&gxz[index]);
-    CCTK_REAL const PDstandardNth12gxz = PDstandardNth12(&gxz[index]);
-    CCTK_REAL const PDstandardNth13gxz = PDstandardNth13(&gxz[index]);
-    CCTK_REAL const PDstandardNth23gxz = PDstandardNth23(&gxz[index]);
-    CCTK_REAL const PDstandardNth1gyy = PDstandardNth1(&gyy[index]);
-    CCTK_REAL const PDstandardNth2gyy = PDstandardNth2(&gyy[index]);
-    CCTK_REAL const PDstandardNth3gyy = PDstandardNth3(&gyy[index]);
-    CCTK_REAL const PDstandardNth11gyy = PDstandardNth11(&gyy[index]);
-    CCTK_REAL const PDstandardNth22gyy = PDstandardNth22(&gyy[index]);
-    CCTK_REAL const PDstandardNth33gyy = PDstandardNth33(&gyy[index]);
-    CCTK_REAL const PDstandardNth12gyy = PDstandardNth12(&gyy[index]);
-    CCTK_REAL const PDstandardNth13gyy = PDstandardNth13(&gyy[index]);
-    CCTK_REAL const PDstandardNth23gyy = PDstandardNth23(&gyy[index]);
-    CCTK_REAL const PDstandardNth1gyz = PDstandardNth1(&gyz[index]);
-    CCTK_REAL const PDstandardNth2gyz = PDstandardNth2(&gyz[index]);
-    CCTK_REAL const PDstandardNth3gyz = PDstandardNth3(&gyz[index]);
-    CCTK_REAL const PDstandardNth11gyz = PDstandardNth11(&gyz[index]);
-    CCTK_REAL const PDstandardNth22gyz = PDstandardNth22(&gyz[index]);
-    CCTK_REAL const PDstandardNth33gyz = PDstandardNth33(&gyz[index]);
-    CCTK_REAL const PDstandardNth12gyz = PDstandardNth12(&gyz[index]);
-    CCTK_REAL const PDstandardNth13gyz = PDstandardNth13(&gyz[index]);
-    CCTK_REAL const PDstandardNth23gyz = PDstandardNth23(&gyz[index]);
-    CCTK_REAL const PDstandardNth1gzz = PDstandardNth1(&gzz[index]);
-    CCTK_REAL const PDstandardNth2gzz = PDstandardNth2(&gzz[index]);
-    CCTK_REAL const PDstandardNth3gzz = PDstandardNth3(&gzz[index]);
-    CCTK_REAL const PDstandardNth11gzz = PDstandardNth11(&gzz[index]);
-    CCTK_REAL const PDstandardNth22gzz = PDstandardNth22(&gzz[index]);
-    CCTK_REAL const PDstandardNth33gzz = PDstandardNth33(&gzz[index]);
-    CCTK_REAL const PDstandardNth12gzz = PDstandardNth12(&gzz[index]);
-    CCTK_REAL const PDstandardNth13gzz = PDstandardNth13(&gzz[index]);
-    CCTK_REAL const PDstandardNth23gzz = PDstandardNth23(&gzz[index]);
-    CCTK_REAL const PDstandardNth1kxx = PDstandardNth1(&kxx[index]);
-    CCTK_REAL const PDstandardNth2kxx = PDstandardNth2(&kxx[index]);
-    CCTK_REAL const PDstandardNth3kxx = PDstandardNth3(&kxx[index]);
-    CCTK_REAL const PDstandardNth1kxy = PDstandardNth1(&kxy[index]);
-    CCTK_REAL const PDstandardNth2kxy = PDstandardNth2(&kxy[index]);
-    CCTK_REAL const PDstandardNth3kxy = PDstandardNth3(&kxy[index]);
-    CCTK_REAL const PDstandardNth1kxz = PDstandardNth1(&kxz[index]);
-    CCTK_REAL const PDstandardNth2kxz = PDstandardNth2(&kxz[index]);
-    CCTK_REAL const PDstandardNth3kxz = PDstandardNth3(&kxz[index]);
-    CCTK_REAL const PDstandardNth1kyy = PDstandardNth1(&kyy[index]);
-    CCTK_REAL const PDstandardNth2kyy = PDstandardNth2(&kyy[index]);
-    CCTK_REAL const PDstandardNth3kyy = PDstandardNth3(&kyy[index]);
-    CCTK_REAL const PDstandardNth1kyz = PDstandardNth1(&kyz[index]);
-    CCTK_REAL const PDstandardNth2kyz = PDstandardNth2(&kyz[index]);
-    CCTK_REAL const PDstandardNth3kyz = PDstandardNth3(&kyz[index]);
-    CCTK_REAL const PDstandardNth1kzz = PDstandardNth1(&kzz[index]);
-    CCTK_REAL const PDstandardNth2kzz = PDstandardNth2(&kzz[index]);
-    CCTK_REAL const PDstandardNth3kzz = PDstandardNth3(&kzz[index]);
+    CCTK_REAL const PDstandardNth1gxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&gxx[index]);
+    CCTK_REAL const PDstandardNth2gxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&gxx[index]);
+    CCTK_REAL const PDstandardNth3gxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&gxx[index]);
+    CCTK_REAL const PDstandardNth11gxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth11(&gxx[index]);
+    CCTK_REAL const PDstandardNth22gxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth22(&gxx[index]);
+    CCTK_REAL const PDstandardNth33gxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth33(&gxx[index]);
+    CCTK_REAL const PDstandardNth12gxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth12(&gxx[index]);
+    CCTK_REAL const PDstandardNth13gxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth13(&gxx[index]);
+    CCTK_REAL const PDstandardNth23gxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth23(&gxx[index]);
+    CCTK_REAL const PDstandardNth1gxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&gxy[index]);
+    CCTK_REAL const PDstandardNth2gxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&gxy[index]);
+    CCTK_REAL const PDstandardNth3gxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&gxy[index]);
+    CCTK_REAL const PDstandardNth11gxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth11(&gxy[index]);
+    CCTK_REAL const PDstandardNth22gxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth22(&gxy[index]);
+    CCTK_REAL const PDstandardNth33gxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth33(&gxy[index]);
+    CCTK_REAL const PDstandardNth12gxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth12(&gxy[index]);
+    CCTK_REAL const PDstandardNth13gxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth13(&gxy[index]);
+    CCTK_REAL const PDstandardNth23gxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth23(&gxy[index]);
+    CCTK_REAL const PDstandardNth1gxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&gxz[index]);
+    CCTK_REAL const PDstandardNth2gxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&gxz[index]);
+    CCTK_REAL const PDstandardNth3gxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&gxz[index]);
+    CCTK_REAL const PDstandardNth11gxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth11(&gxz[index]);
+    CCTK_REAL const PDstandardNth22gxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth22(&gxz[index]);
+    CCTK_REAL const PDstandardNth33gxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth33(&gxz[index]);
+    CCTK_REAL const PDstandardNth12gxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth12(&gxz[index]);
+    CCTK_REAL const PDstandardNth13gxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth13(&gxz[index]);
+    CCTK_REAL const PDstandardNth23gxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth23(&gxz[index]);
+    CCTK_REAL const PDstandardNth1gyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&gyy[index]);
+    CCTK_REAL const PDstandardNth2gyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&gyy[index]);
+    CCTK_REAL const PDstandardNth3gyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&gyy[index]);
+    CCTK_REAL const PDstandardNth11gyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth11(&gyy[index]);
+    CCTK_REAL const PDstandardNth22gyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth22(&gyy[index]);
+    CCTK_REAL const PDstandardNth33gyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth33(&gyy[index]);
+    CCTK_REAL const PDstandardNth12gyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth12(&gyy[index]);
+    CCTK_REAL const PDstandardNth13gyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth13(&gyy[index]);
+    CCTK_REAL const PDstandardNth23gyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth23(&gyy[index]);
+    CCTK_REAL const PDstandardNth1gyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&gyz[index]);
+    CCTK_REAL const PDstandardNth2gyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&gyz[index]);
+    CCTK_REAL const PDstandardNth3gyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&gyz[index]);
+    CCTK_REAL const PDstandardNth11gyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth11(&gyz[index]);
+    CCTK_REAL const PDstandardNth22gyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth22(&gyz[index]);
+    CCTK_REAL const PDstandardNth33gyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth33(&gyz[index]);
+    CCTK_REAL const PDstandardNth12gyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth12(&gyz[index]);
+    CCTK_REAL const PDstandardNth13gyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth13(&gyz[index]);
+    CCTK_REAL const PDstandardNth23gyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth23(&gyz[index]);
+    CCTK_REAL const PDstandardNth1gzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&gzz[index]);
+    CCTK_REAL const PDstandardNth2gzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&gzz[index]);
+    CCTK_REAL const PDstandardNth3gzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&gzz[index]);
+    CCTK_REAL const PDstandardNth11gzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth11(&gzz[index]);
+    CCTK_REAL const PDstandardNth22gzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth22(&gzz[index]);
+    CCTK_REAL const PDstandardNth33gzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth33(&gzz[index]);
+    CCTK_REAL const PDstandardNth12gzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth12(&gzz[index]);
+    CCTK_REAL const PDstandardNth13gzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth13(&gzz[index]);
+    CCTK_REAL const PDstandardNth23gzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth23(&gzz[index]);
+    CCTK_REAL const PDstandardNth1kxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&kxx[index]);
+    CCTK_REAL const PDstandardNth2kxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&kxx[index]);
+    CCTK_REAL const PDstandardNth3kxx CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&kxx[index]);
+    CCTK_REAL const PDstandardNth1kxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&kxy[index]);
+    CCTK_REAL const PDstandardNth2kxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&kxy[index]);
+    CCTK_REAL const PDstandardNth3kxy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&kxy[index]);
+    CCTK_REAL const PDstandardNth1kxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&kxz[index]);
+    CCTK_REAL const PDstandardNth2kxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&kxz[index]);
+    CCTK_REAL const PDstandardNth3kxz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&kxz[index]);
+    CCTK_REAL const PDstandardNth1kyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&kyy[index]);
+    CCTK_REAL const PDstandardNth2kyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&kyy[index]);
+    CCTK_REAL const PDstandardNth3kyy CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&kyy[index]);
+    CCTK_REAL const PDstandardNth1kyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&kyz[index]);
+    CCTK_REAL const PDstandardNth2kyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&kyz[index]);
+    CCTK_REAL const PDstandardNth3kyz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&kyz[index]);
+    CCTK_REAL const PDstandardNth1kzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth1(&kzz[index]);
+    CCTK_REAL const PDstandardNth2kzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth2(&kzz[index]);
+    CCTK_REAL const PDstandardNth3kzz CCTK_ATTRIBUTE_UNUSED  = PDstandardNth3(&kzz[index]);
     
     /* Calculate temporaries and grid functions */
-    CCTK_REAL JacPDstandardNth11gyy;
-    CCTK_REAL JacPDstandardNth11gyz;
-    CCTK_REAL JacPDstandardNth11gzz;
-    CCTK_REAL JacPDstandardNth12gxx;
-    CCTK_REAL JacPDstandardNth12gxy;
-    CCTK_REAL JacPDstandardNth12gxz;
-    CCTK_REAL JacPDstandardNth12gyy;
-    CCTK_REAL JacPDstandardNth12gyz;
-    CCTK_REAL JacPDstandardNth12gzz;
-    CCTK_REAL JacPDstandardNth13gxx;
-    CCTK_REAL JacPDstandardNth13gxy;
-    CCTK_REAL JacPDstandardNth13gxz;
-    CCTK_REAL JacPDstandardNth13gyy;
-    CCTK_REAL JacPDstandardNth13gyz;
-    CCTK_REAL JacPDstandardNth13gzz;
-    CCTK_REAL JacPDstandardNth1gxx;
-    CCTK_REAL JacPDstandardNth1gxy;
-    CCTK_REAL JacPDstandardNth1gxz;
-    CCTK_REAL JacPDstandardNth1gyy;
-    CCTK_REAL JacPDstandardNth1gyz;
-    CCTK_REAL JacPDstandardNth1gzz;
-    CCTK_REAL JacPDstandardNth1kxy;
-    CCTK_REAL JacPDstandardNth1kxz;
-    CCTK_REAL JacPDstandardNth1kyy;
-    CCTK_REAL JacPDstandardNth1kyz;
-    CCTK_REAL JacPDstandardNth1kzz;
-    CCTK_REAL JacPDstandardNth21gxx;
-    CCTK_REAL JacPDstandardNth21gxy;
-    CCTK_REAL JacPDstandardNth21gxz;
-    CCTK_REAL JacPDstandardNth21gyy;
-    CCTK_REAL JacPDstandardNth21gyz;
-    CCTK_REAL JacPDstandardNth21gzz;
-    CCTK_REAL JacPDstandardNth22gxx;
-    CCTK_REAL JacPDstandardNth22gxz;
-    CCTK_REAL JacPDstandardNth22gzz;
-    CCTK_REAL JacPDstandardNth23gxx;
-    CCTK_REAL JacPDstandardNth23gxy;
-    CCTK_REAL JacPDstandardNth23gxz;
-    CCTK_REAL JacPDstandardNth23gyy;
-    CCTK_REAL JacPDstandardNth23gyz;
-    CCTK_REAL JacPDstandardNth23gzz;
-    CCTK_REAL JacPDstandardNth2gxx;
-    CCTK_REAL JacPDstandardNth2gxy;
-    CCTK_REAL JacPDstandardNth2gxz;
-    CCTK_REAL JacPDstandardNth2gyy;
-    CCTK_REAL JacPDstandardNth2gyz;
-    CCTK_REAL JacPDstandardNth2gzz;
-    CCTK_REAL JacPDstandardNth2kxx;
-    CCTK_REAL JacPDstandardNth2kxy;
-    CCTK_REAL JacPDstandardNth2kxz;
-    CCTK_REAL JacPDstandardNth2kyz;
-    CCTK_REAL JacPDstandardNth2kzz;
-    CCTK_REAL JacPDstandardNth31gxx;
-    CCTK_REAL JacPDstandardNth31gxy;
-    CCTK_REAL JacPDstandardNth31gxz;
-    CCTK_REAL JacPDstandardNth31gyy;
-    CCTK_REAL JacPDstandardNth31gyz;
-    CCTK_REAL JacPDstandardNth31gzz;
-    CCTK_REAL JacPDstandardNth32gxx;
-    CCTK_REAL JacPDstandardNth32gxy;
-    CCTK_REAL JacPDstandardNth32gxz;
-    CCTK_REAL JacPDstandardNth32gyy;
-    CCTK_REAL JacPDstandardNth32gyz;
-    CCTK_REAL JacPDstandardNth32gzz;
-    CCTK_REAL JacPDstandardNth33gxx;
-    CCTK_REAL JacPDstandardNth33gxy;
-    CCTK_REAL JacPDstandardNth33gyy;
-    CCTK_REAL JacPDstandardNth3gxx;
-    CCTK_REAL JacPDstandardNth3gxy;
-    CCTK_REAL JacPDstandardNth3gxz;
-    CCTK_REAL JacPDstandardNth3gyy;
-    CCTK_REAL JacPDstandardNth3gyz;
-    CCTK_REAL JacPDstandardNth3gzz;
-    CCTK_REAL JacPDstandardNth3kxx;
-    CCTK_REAL JacPDstandardNth3kxy;
-    CCTK_REAL JacPDstandardNth3kxz;
-    CCTK_REAL JacPDstandardNth3kyy;
-    CCTK_REAL JacPDstandardNth3kyz;
+    CCTK_REAL JacPDstandardNth11gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth11gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth11gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth12gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth12gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth12gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth12gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth12gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth12gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth13gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth13gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth13gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth13gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth13gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth13gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1kxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1kxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1kyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1kyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth1kzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth21gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth21gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth21gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth21gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth21gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth21gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth22gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth22gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth22gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth23gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth23gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth23gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth23gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth23gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth23gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2kxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2kxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2kxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2kyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth2kzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth31gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth31gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth31gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth31gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth31gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth31gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth32gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth32gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth32gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth32gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth32gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth32gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth33gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth33gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth33gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3gxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3gxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3gxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3gyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3gyz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3gzz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3kxx CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3kxy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3kxz CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3kyy CCTK_ATTRIBUTE_UNUSED ;
+    CCTK_REAL JacPDstandardNth3kyz CCTK_ATTRIBUTE_UNUSED ;
     
     if (use_jacobian)
     {
@@ -980,101 +980,115 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
       JacPDstandardNth32gzz = PDstandardNth23gzz;
     }
     
-    CCTK_REAL detg = 2*gxyL*gxzL*gyzL + gzzL*(gxxL*gyyL - 
-      SQR(gxyL)) - gyyL*SQR(gxzL) - gxxL*SQR(gyzL);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED detg = 2*gxyL*gxzL*gyzL + 
+      gzzL*(gxxL*gyyL - SQR(gxyL)) - gyyL*SQR(gxzL) - 
+      gxxL*SQR(gyzL);
     
-    CCTK_REAL gu11 = INV(detg)*(gyyL*gzzL - SQR(gyzL));
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED gu11 = INV(detg)*(gyyL*gzzL - 
+      SQR(gyzL));
     
-    CCTK_REAL gu21 = (gxzL*gyzL - gxyL*gzzL)*INV(detg);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED gu21 = (gxzL*gyzL - 
+      gxyL*gzzL)*INV(detg);
     
-    CCTK_REAL gu31 = (-(gxzL*gyyL) + gxyL*gyzL)*INV(detg);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED gu31 = (-(gxzL*gyyL) + 
+      gxyL*gyzL)*INV(detg);
     
-    CCTK_REAL gu22 = INV(detg)*(gxxL*gzzL - SQR(gxzL));
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED gu22 = INV(detg)*(gxxL*gzzL - 
+      SQR(gxzL));
     
-    CCTK_REAL gu32 = (gxyL*gxzL - gxxL*gyzL)*INV(detg);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED gu32 = (gxyL*gxzL - 
+      gxxL*gyzL)*INV(detg);
     
-    CCTK_REAL gu33 = INV(detg)*(gxxL*gyyL - SQR(gxyL));
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED gu33 = INV(detg)*(gxxL*gyyL - 
+      SQR(gxyL));
     
-    CCTK_REAL G111 = 0.5*(gu11*JacPDstandardNth1gxx + 
-      2*(gu21*JacPDstandardNth1gxy + gu31*JacPDstandardNth1gxz) - 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G111 = 0.5*(gu11*JacPDstandardNth1gxx 
+      + 2*(gu21*JacPDstandardNth1gxy + gu31*JacPDstandardNth1gxz) - 
       gu21*JacPDstandardNth2gxx - gu31*JacPDstandardNth3gxx);
     
-    CCTK_REAL G211 = 0.5*(gu21*JacPDstandardNth1gxx + 
-      2*(gu22*JacPDstandardNth1gxy + gu32*JacPDstandardNth1gxz) - 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G211 = 0.5*(gu21*JacPDstandardNth1gxx 
+      + 2*(gu22*JacPDstandardNth1gxy + gu32*JacPDstandardNth1gxz) - 
       gu22*JacPDstandardNth2gxx - gu32*JacPDstandardNth3gxx);
     
-    CCTK_REAL G311 = 0.5*(gu31*JacPDstandardNth1gxx + 
-      2*(gu32*JacPDstandardNth1gxy + gu33*JacPDstandardNth1gxz) - 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G311 = 0.5*(gu31*JacPDstandardNth1gxx 
+      + 2*(gu32*JacPDstandardNth1gxy + gu33*JacPDstandardNth1gxz) - 
       gu32*JacPDstandardNth2gxx - gu33*JacPDstandardNth3gxx);
     
-    CCTK_REAL G112 = 0.5*(gu21*JacPDstandardNth1gyy + 
-      gu11*JacPDstandardNth2gxx + gu31*(JacPDstandardNth1gyz + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G112 = 0.5*(gu21*JacPDstandardNth1gyy 
+      + gu11*JacPDstandardNth2gxx + gu31*(JacPDstandardNth1gyz + 
       JacPDstandardNth2gxz - JacPDstandardNth3gxy));
     
-    CCTK_REAL G212 = 0.5*(gu22*JacPDstandardNth1gyy + 
-      gu21*JacPDstandardNth2gxx + gu32*(JacPDstandardNth1gyz + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G212 = 0.5*(gu22*JacPDstandardNth1gyy 
+      + gu21*JacPDstandardNth2gxx + gu32*(JacPDstandardNth1gyz + 
       JacPDstandardNth2gxz - JacPDstandardNth3gxy));
     
-    CCTK_REAL G312 = 0.5*(gu32*JacPDstandardNth1gyy + 
-      gu31*JacPDstandardNth2gxx + gu33*(JacPDstandardNth1gyz + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G312 = 0.5*(gu32*JacPDstandardNth1gyy 
+      + gu31*JacPDstandardNth2gxx + gu33*(JacPDstandardNth1gyz + 
       JacPDstandardNth2gxz - JacPDstandardNth3gxy));
     
-    CCTK_REAL G113 = 0.5*(gu31*JacPDstandardNth1gzz + 
-      gu11*JacPDstandardNth3gxx + gu21*(JacPDstandardNth1gyz - 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G113 = 0.5*(gu31*JacPDstandardNth1gzz 
+      + gu11*JacPDstandardNth3gxx + gu21*(JacPDstandardNth1gyz - 
       JacPDstandardNth2gxz + JacPDstandardNth3gxy));
     
-    CCTK_REAL G213 = 0.5*(gu32*JacPDstandardNth1gzz + 
-      gu21*JacPDstandardNth3gxx + gu22*(JacPDstandardNth1gyz - 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G213 = 0.5*(gu32*JacPDstandardNth1gzz 
+      + gu21*JacPDstandardNth3gxx + gu22*(JacPDstandardNth1gyz - 
       JacPDstandardNth2gxz + JacPDstandardNth3gxy));
     
-    CCTK_REAL G313 = 0.5*(gu33*JacPDstandardNth1gzz + 
-      gu31*JacPDstandardNth3gxx + gu32*(JacPDstandardNth1gyz - 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G313 = 0.5*(gu33*JacPDstandardNth1gzz 
+      + gu31*JacPDstandardNth3gxx + gu32*(JacPDstandardNth1gyz - 
       JacPDstandardNth2gxz + JacPDstandardNth3gxy));
     
-    CCTK_REAL G122 = 0.5*(gu11*(-JacPDstandardNth1gyy + 
-      2*JacPDstandardNth2gxy) + gu21*JacPDstandardNth2gyy + 
-      gu31*(2*JacPDstandardNth2gyz - JacPDstandardNth3gyy));
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G122 = 
+      0.5*(gu11*(-JacPDstandardNth1gyy + 2*JacPDstandardNth2gxy) + 
+      gu21*JacPDstandardNth2gyy + gu31*(2*JacPDstandardNth2gyz - 
+      JacPDstandardNth3gyy));
     
-    CCTK_REAL G222 = 0.5*(gu21*(-JacPDstandardNth1gyy + 
-      2*JacPDstandardNth2gxy) + gu22*JacPDstandardNth2gyy + 
-      gu32*(2*JacPDstandardNth2gyz - JacPDstandardNth3gyy));
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G222 = 
+      0.5*(gu21*(-JacPDstandardNth1gyy + 2*JacPDstandardNth2gxy) + 
+      gu22*JacPDstandardNth2gyy + gu32*(2*JacPDstandardNth2gyz - 
+      JacPDstandardNth3gyy));
     
-    CCTK_REAL G322 = 0.5*(gu31*(-JacPDstandardNth1gyy + 
-      2*JacPDstandardNth2gxy) + gu32*JacPDstandardNth2gyy + 
-      gu33*(2*JacPDstandardNth2gyz - JacPDstandardNth3gyy));
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G322 = 
+      0.5*(gu31*(-JacPDstandardNth1gyy + 2*JacPDstandardNth2gxy) + 
+      gu32*JacPDstandardNth2gyy + gu33*(2*JacPDstandardNth2gyz - 
+      JacPDstandardNth3gyy));
     
-    CCTK_REAL G123 = 0.5*(gu31*JacPDstandardNth2gzz + 
-      gu11*(-JacPDstandardNth1gyz + JacPDstandardNth2gxz + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G123 = 0.5*(gu31*JacPDstandardNth2gzz 
+      + gu11*(-JacPDstandardNth1gyz + JacPDstandardNth2gxz + 
       JacPDstandardNth3gxy) + gu21*JacPDstandardNth3gyy);
     
-    CCTK_REAL G223 = 0.5*(gu32*JacPDstandardNth2gzz + 
-      gu21*(-JacPDstandardNth1gyz + JacPDstandardNth2gxz + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G223 = 0.5*(gu32*JacPDstandardNth2gzz 
+      + gu21*(-JacPDstandardNth1gyz + JacPDstandardNth2gxz + 
       JacPDstandardNth3gxy) + gu22*JacPDstandardNth3gyy);
     
-    CCTK_REAL G323 = 0.5*(gu33*JacPDstandardNth2gzz + 
-      gu31*(-JacPDstandardNth1gyz + JacPDstandardNth2gxz + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G323 = 0.5*(gu33*JacPDstandardNth2gzz 
+      + gu31*(-JacPDstandardNth1gyz + JacPDstandardNth2gxz + 
       JacPDstandardNth3gxy) + gu32*JacPDstandardNth3gyy);
     
-    CCTK_REAL G133 = 0.5*(gu11*(-JacPDstandardNth1gzz + 
-      2*JacPDstandardNth3gxz) + gu21*(-JacPDstandardNth2gzz + 
-      2*JacPDstandardNth3gyz) + gu31*JacPDstandardNth3gzz);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G133 = 
+      0.5*(gu11*(-JacPDstandardNth1gzz + 2*JacPDstandardNth3gxz) + 
+      gu21*(-JacPDstandardNth2gzz + 2*JacPDstandardNth3gyz) + 
+      gu31*JacPDstandardNth3gzz);
     
-    CCTK_REAL G233 = 0.5*(gu21*(-JacPDstandardNth1gzz + 
-      2*JacPDstandardNth3gxz) + gu22*(-JacPDstandardNth2gzz + 
-      2*JacPDstandardNth3gyz) + gu32*JacPDstandardNth3gzz);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G233 = 
+      0.5*(gu21*(-JacPDstandardNth1gzz + 2*JacPDstandardNth3gxz) + 
+      gu22*(-JacPDstandardNth2gzz + 2*JacPDstandardNth3gyz) + 
+      gu32*JacPDstandardNth3gzz);
     
-    CCTK_REAL G333 = 0.5*(gu31*(-JacPDstandardNth1gzz + 
-      2*JacPDstandardNth3gxz) + gu32*(-JacPDstandardNth2gzz + 
-      2*JacPDstandardNth3gyz) + gu33*JacPDstandardNth3gzz);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED G333 = 
+      0.5*(gu31*(-JacPDstandardNth1gzz + 2*JacPDstandardNth3gxz) + 
+      gu32*(-JacPDstandardNth2gzz + 2*JacPDstandardNth3gyz) + 
+      gu33*JacPDstandardNth3gzz);
     
-    CCTK_REAL R11 = 0.5*(gu21*(-JacPDstandardNth12gxx + 
-      JacPDstandardNth21gxx) + gu31*(-JacPDstandardNth13gxx + 
-      JacPDstandardNth31gxx) + gu32*(4*(gxyL*(-(G123*G211) + G113*G212) + 
-      gyyL*(G212*G213 - G211*G223) + gxzL*G113*G312 + gyzL*G212*G313 + 
-      gzzL*G312*G313 + G112*(gxxL*G113 + gxyL*G213 + gxzL*G313) - 
-      G111*(gxxL*G123 + gxyL*G223 + gxzL*G323) + G311*(-(gxzL*G123) - 
-      gyzL*G223 - gzzL*G323) + gyzL*(G213*G312 - G211*G323)) - 
-      JacPDstandardNth11gyz + JacPDstandardNth21gxz - JacPDstandardNth23gxx + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED R11 = 
+      0.5*(gu21*(-JacPDstandardNth12gxx + JacPDstandardNth21gxx) + 
+      gu31*(-JacPDstandardNth13gxx + JacPDstandardNth31gxx) + 
+      gu32*(4*(gxyL*(-(G123*G211) + G113*G212) + gyyL*(G212*G213 - 
+      G211*G223) + gxzL*G113*G312 + gyzL*G212*G313 + gzzL*G312*G313 + 
+      G112*(gxxL*G113 + gxyL*G213 + gxzL*G313) - G111*(gxxL*G123 + 
+      gxyL*G223 + gxzL*G323) + G311*(-(gxzL*G123) - gyzL*G223 - 
+      gzzL*G323) + gyzL*(G213*G312 - G211*G323)) - JacPDstandardNth11gyz 
+      + JacPDstandardNth21gxz - JacPDstandardNth23gxx + 
       JacPDstandardNth31gxy) + gu32*(-JacPDstandardNth11gyz + 
       JacPDstandardNth21gxz + JacPDstandardNth31gxy - JacPDstandardNth32gxx) 
       + gu22*(-JacPDstandardNth11gyy + 2*JacPDstandardNth21gxy - 
@@ -1089,14 +1103,14 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
       G311*(-(gxzL*G133) - gyzL*G233 - gzzL*G333) + gxxL*SQR(G113) + 
       gyyL*SQR(G213) + gzzL*SQR(G313))));
     
-    CCTK_REAL R12 = 0.5*(gu22*(-JacPDstandardNth12gyy + 
-      JacPDstandardNth21gyy) + gu21*(JacPDstandardNth11gyy - 
-      2*JacPDstandardNth12gxy + JacPDstandardNth22gxx) + 
-      gu32*(-2*JacPDstandardNth12gyz + JacPDstandardNth21gyz + 
-      JacPDstandardNth22gxz - JacPDstandardNth23gxy + JacPDstandardNth31gyy) 
-      + gu31*(JacPDstandardNth11gyz - JacPDstandardNth12gxz - 
-      JacPDstandardNth13gxy + JacPDstandardNth32gxx) + 
-      gu33*(-JacPDstandardNth12gzz + JacPDstandardNth31gyz + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED R12 = 
+      0.5*(gu22*(-JacPDstandardNth12gyy + JacPDstandardNth21gyy) + 
+      gu21*(JacPDstandardNth11gyy - 2*JacPDstandardNth12gxy + 
+      JacPDstandardNth22gxx) + gu32*(-2*JacPDstandardNth12gyz + 
+      JacPDstandardNth21gyz + JacPDstandardNth22gxz - JacPDstandardNth23gxy + 
+      JacPDstandardNth31gyy) + gu31*(JacPDstandardNth11gyz - 
+      JacPDstandardNth12gxz - JacPDstandardNth13gxy + JacPDstandardNth32gxx) 
+      + gu33*(-JacPDstandardNth12gzz + JacPDstandardNth31gyz + 
       JacPDstandardNth32gxz - JacPDstandardNth33gxy) + 2*((gxyL*(G123*G211 
       - G113*G212) + gyyL*(-(G212*G213) + G211*G223) - G112*(gxxL*G113 + 
       gxyL*G213 + gxzL*G313) + G312*(-(gxzL*G113) - gyzL*G213 - 
@@ -1118,11 +1132,11 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
       gzzL*G322) - gxxL*SQR(G112) - gyyL*SQR(G212) - 
       gzzL*SQR(G312))));
     
-    CCTK_REAL R13 = 0.5*(gu21*(JacPDstandardNth11gyz - 
-      JacPDstandardNth12gxz - JacPDstandardNth13gxy + JacPDstandardNth23gxx) 
-      + gu22*(-JacPDstandardNth13gyy + JacPDstandardNth21gyz - 
-      JacPDstandardNth22gxz + JacPDstandardNth23gxy) + 
-      gu33*(-JacPDstandardNth13gzz + JacPDstandardNth31gzz) + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED R13 = 0.5*(gu21*(JacPDstandardNth11gyz 
+      - JacPDstandardNth12gxz - JacPDstandardNth13gxy + 
+      JacPDstandardNth23gxx) + gu22*(-JacPDstandardNth13gyy + 
+      JacPDstandardNth21gyz - JacPDstandardNth22gxz + JacPDstandardNth23gxy) 
+      + gu33*(-JacPDstandardNth13gzz + JacPDstandardNth31gzz) + 
       gu31*(JacPDstandardNth11gzz - 2*JacPDstandardNth13gxz + 
       JacPDstandardNth33gxx) + gu32*(-2*JacPDstandardNth13gyz + 
       JacPDstandardNth21gzz + JacPDstandardNth31gyz - JacPDstandardNth32gxz + 
@@ -1146,8 +1160,8 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
       gyzL*G233 + gzzL*G333) - gxxL*SQR(G113) - gyyL*SQR(G213) - 
       gzzL*SQR(G313))));
     
-    CCTK_REAL R22 = 0.5*(gu21*(JacPDstandardNth12gyy - 
-      JacPDstandardNth21gyy) + gu31*(4*(gxyL*(G123*G212 - G122*G213) + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED R22 = 0.5*(gu21*(JacPDstandardNth12gyy 
+      - JacPDstandardNth21gyy) + gu31*(4*(gxyL*(G123*G212 - G122*G213) + 
       gyyL*(-(G213*G222) + G212*G223) + gxzL*(G123*G312 - G122*G313) - 
       G113*(gxxL*G122 + gxyL*G222 + gxzL*G322) + gyzL*(G223*G312 - 
       G222*G313 - G213*G322) + gyzL*G212*G323 + G112*(gxxL*G123 + 
@@ -1168,9 +1182,10 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
       G322*(-(gxzL*G133) - gyzL*G233 - gzzL*G333) + gxxL*SQR(G123) + 
       gyyL*SQR(G223) + gzzL*SQR(G323))));
     
-    CCTK_REAL R23 = 0.5*(gu11*(-JacPDstandardNth11gyz + 
-      JacPDstandardNth12gxz + JacPDstandardNth13gxy - JacPDstandardNth23gxx) 
-      + gu21*(JacPDstandardNth13gyy - JacPDstandardNth21gyz + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED R23 = 
+      0.5*(gu11*(-JacPDstandardNth11gyz + JacPDstandardNth12gxz + 
+      JacPDstandardNth13gxy - JacPDstandardNth23gxx) + 
+      gu21*(JacPDstandardNth13gyy - JacPDstandardNth21gyz + 
       JacPDstandardNth22gxz - JacPDstandardNth23gxy) + 
       gu33*(-JacPDstandardNth23gzz + JacPDstandardNth32gzz) + 
       gu31*(JacPDstandardNth12gzz - 2*JacPDstandardNth23gxz - 
@@ -1196,8 +1211,8 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
       G322*(gxzL*G133 + gyzL*G233 + gzzL*G333) - gxxL*SQR(G123) - 
       gyyL*SQR(G223) - gzzL*SQR(G323))));
     
-    CCTK_REAL R33 = 0.5*(gu31*(JacPDstandardNth13gzz - 
-      JacPDstandardNth31gzz) + gu32*(JacPDstandardNth23gzz - 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED R33 = 0.5*(gu31*(JacPDstandardNth13gzz 
+      - JacPDstandardNth31gzz) + gu32*(JacPDstandardNth23gzz - 
       JacPDstandardNth32gzz) + gu21*(4*(gxyL*(-(G133*G212) + G123*G213) + 
       gyyL*(G213*G223 - G212*G233) + gxzL*G123*G313 + gyzL*G213*G323 + 
       gzzL*G313*G323 + G113*(gxxL*G123 + gxyL*G223 + gxzL*G323) - 
@@ -1218,81 +1233,91 @@ static void ML_ADMConstraints_Body(cGH const * restrict const cctkGH, int const
       G322*(-(gxzL*G133) - gyzL*G233 - gzzL*G333) + gxxL*SQR(G123) + 
       gyyL*SQR(G223) + gzzL*SQR(G323))));
     
-    CCTK_REAL trR = gu11*R11 + gu22*R22 + 2*(gu21*R12 + gu31*R13 + 
-      gu32*R23) + gu33*R33;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED trR = gu11*R11 + gu22*R22 + 
+      2*(gu21*R12 + gu31*R13 + gu32*R23) + gu33*R33;
     
-    CCTK_REAL Km11 = kxxL*gu11 + kxyL*gu21 + kxzL*gu31;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED Km11 = kxxL*gu11 + kxyL*gu21 + 
+      kxzL*gu31;
     
-    CCTK_REAL Km21 = kxxL*gu21 + kxyL*gu22 + kxzL*gu32;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED Km21 = kxxL*gu21 + kxyL*gu22 + 
+      kxzL*gu32;
     
-    CCTK_REAL Km31 = kxxL*gu31 + kxyL*gu32 + kxzL*gu33;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED Km31 = kxxL*gu31 + kxyL*gu32 + 
+      kxzL*gu33;
     
-    CCTK_REAL Km12 = kxyL*gu11 + kyyL*gu21 + kyzL*gu31;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED Km12 = kxyL*gu11 + kyyL*gu21 + 
+      kyzL*gu31;
     
-    CCTK_REAL Km22 = kxyL*gu21 + kyyL*gu22 + kyzL*gu32;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED Km22 = kxyL*gu21 + kyyL*gu22 + 
+      kyzL*gu32;
     
-    CCTK_REAL Km32 = kxyL*gu31 + kyyL*gu32 + kyzL*gu33;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED Km32 = kxyL*gu31 + kyyL*gu32 + 
+      kyzL*gu33;
     
-    CCTK_REAL Km13 = kxzL*gu11 + kyzL*gu21 + kzzL*gu31;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED Km13 = kxzL*gu11 + kyzL*gu21 + 
+      kzzL*gu31;
     
-    CCTK_REAL Km23 = kxzL*gu21 + kyzL*gu22 + kzzL*gu32;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED Km23 = kxzL*gu21 + kyzL*gu22 + 
+      kzzL*gu32;
     
-    CCTK_REAL Km33 = kxzL*gu31 + kyzL*gu32 + kzzL*gu33;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED Km33 = kxzL*gu31 + kyzL*gu32 + 
+      kzzL*gu33;
     
-    CCTK_REAL trK = Km11 + Km22 + Km33;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED trK = Km11 + Km22 + Km33;
     
-    CCTK_REAL rho = INV(SQR(alpL))*(eTttL - 2*(betayL*eTtyL + 
-      betazL*eTtzL) + 2*(betaxL*(-eTtxL + betayL*eTxyL + 
-      betazL*eTxzL) + betayL*betazL*eTyzL) + eTxxL*SQR(betaxL) 
-      + eTyyL*SQR(betayL) + eTzzL*SQR(betazL));
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED rho = INV(SQR(alpL))*(eTttL - 
+      2*(betayL*eTtyL + betazL*eTtzL) + 2*(betaxL*(-eTtxL + 
+      betayL*eTxyL + betazL*eTxzL) + betayL*betazL*eTyzL) + 
+      eTxxL*SQR(betaxL) + eTyyL*SQR(betayL) + eTzzL*SQR(betazL));
     
-    CCTK_REAL S1 = (-eTtxL + betaxL*eTxxL + betayL*eTxyL + 
-      betazL*eTxzL)*INV(alpL);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED S1 = (-eTtxL + betaxL*eTxxL + 
+      betayL*eTxyL + betazL*eTxzL)*INV(alpL);
     
-    CCTK_REAL S2 = (-eTtyL + betaxL*eTxyL + betayL*eTyyL + 
-      betazL*eTyzL)*INV(alpL);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED S2 = (-eTtyL + betaxL*eTxyL + 
+      betayL*eTyyL + betazL*eTyzL)*INV(alpL);
     
-    CCTK_REAL S3 = (-eTtzL + betaxL*eTxzL + betayL*eTyzL + 
-      betazL*eTzzL)*INV(alpL);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED S3 = (-eTtzL + betaxL*eTxzL + 
+      betayL*eTyzL + betazL*eTzzL)*INV(alpL);
     
-    CCTK_REAL HL = -2*(Km12*Km21 + Km13*Km31 + Km23*Km32) - 16*Pi*rho + 
-      trR - SQR(Km11) - SQR(Km22) - SQR(Km33) + SQR(trK);
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED HL = -2*(Km12*Km21 + Km13*Km31 + 
+      Km23*Km32) - 16*Pi*rho + trR - SQR(Km11) - SQR(Km22) - SQR(Km33) + 
+      SQR(trK);
     
-    CCTK_REAL M1L = gu21*(-(kxxL*G112) + kyyL*G211 + kxyL*(G111 - 
-      G212) + kyzL*G311 - kxzL*G312 - JacPDstandardNth1kxy + 
-      JacPDstandardNth2kxx) + gu22*(-(kxxL*G122) + kyyL*G212 + 
-      kxyL*(G112 - G222) + kyzL*G312 - kxzL*G322 - JacPDstandardNth1kyy 
-      + JacPDstandardNth2kxy) + gu31*(-(kxxL*G113) + kyzL*G211 - 
-      kxyL*G213 + kzzL*G311 + kxzL*(G111 - G313) - JacPDstandardNth1kxz 
-      + JacPDstandardNth3kxx) + gu32*(kyyL*G213 + kxyL*(G113 - 2*G223) + 
-      kzzL*G312 + kyzL*(G212 + G313) + kxzL*(G112 - 2*G323) - 
-      2*(kxxL*G123 + JacPDstandardNth1kyz) + JacPDstandardNth2kxz + 
-      JacPDstandardNth3kxy) + gu33*(-(kxxL*G133) + kyzL*G213 - 
-      kxyL*G233 + kzzL*G313 + kxzL*(G113 - G333) - JacPDstandardNth1kzz 
-      + JacPDstandardNth3kxz) - 8*Pi*S1;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED M1L = gu21*(-(kxxL*G112) + 
+      kyyL*G211 + kxyL*(G111 - G212) + kyzL*G311 - kxzL*G312 - 
+      JacPDstandardNth1kxy + JacPDstandardNth2kxx) + gu22*(-(kxxL*G122) + 
+      kyyL*G212 + kxyL*(G112 - G222) + kyzL*G312 - kxzL*G322 - 
+      JacPDstandardNth1kyy + JacPDstandardNth2kxy) + gu31*(-(kxxL*G113) + 
+      kyzL*G211 - kxyL*G213 + kzzL*G311 + kxzL*(G111 - G313) - 
+      JacPDstandardNth1kxz + JacPDstandardNth3kxx) + gu32*(kyyL*G213 + 
+      kxyL*(G113 - 2*G223) + kzzL*G312 + kyzL*(G212 + G313) + 
+      kxzL*(G112 - 2*G323) - 2*(kxxL*G123 + JacPDstandardNth1kyz) + 
+      JacPDstandardNth2kxz + JacPDstandardNth3kxy) + gu33*(-(kxxL*G133) + 
+      kyzL*G213 - kxyL*G233 + kzzL*G313 + kxzL*(G113 - G333) - 
+      JacPDstandardNth1kzz + JacPDstandardNth3kxz) - 8*Pi*S1;
     
-    CCTK_REAL M2L = gu11*(kxxL*G112 - kyyL*G211 + kxyL*(-G111 + 
-      G212) - kyzL*G311 + kxzL*G312 + JacPDstandardNth1kxy - 
-      JacPDstandardNth2kxx) + gu21*(kxxL*G122 - kyyL*G212 + kxyL*(-G112 
-      + G222) - kyzL*G312 + kxzL*G322 + JacPDstandardNth1kyy - 
-      JacPDstandardNth2kxy) + gu31*(kxxL*G123 + kxyL*G223 + kzzL*G312 + 
-      kyzL*(G212 - 2*G313) + kxzL*(G112 + G323) + JacPDstandardNth1kyz - 
-      2*(kxyL*G113 + kyyL*G213 + JacPDstandardNth2kxz) + 
-      JacPDstandardNth3kxy) + gu32*(kxzL*G122 - kxyL*G123 - kyyL*G223 + 
-      kzzL*G322 + kyzL*(G222 - G323) - JacPDstandardNth2kyz + 
-      JacPDstandardNth3kyy) + gu33*(kxzL*G123 - kxyL*G133 - kyyL*G233 + 
-      kzzL*G323 + kyzL*(G223 - G333) - JacPDstandardNth2kzz + 
-      JacPDstandardNth3kyz) - 8*Pi*S2;
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED M2L = gu11*(kxxL*G112 - kyyL*G211 
+      + kxyL*(-G111 + G212) - kyzL*G311 + kxzL*G312 + 
+      JacPDstandardNth1kxy - JacPDstandardNth2kxx) + gu21*(kxxL*G122 - 
+      kyyL*G212 + kxyL*(-G112 + G222) - kyzL*G312 + kxzL*G322 + 
+      JacPDstandardNth1kyy - JacPDstandardNth2kxy) + gu31*(kxxL*G123 + 
+      kxyL*G223 + kzzL*G312 + kyzL*(G212 - 2*G313) + kxzL*(G112 + 
+      G323) + JacPDstandardNth1kyz - 2*(kxyL*G113 + kyyL*G213 + 
+      JacPDstandardNth2kxz) + JacPDstandardNth3kxy) + gu32*(kxzL*G122 - 
+      kxyL*G123 - kyyL*G223 + kzzL*G322 + kyzL*(G222 - G323) - 
+      JacPDstandardNth2kyz + JacPDstandardNth3kyy) + gu33*(kxzL*G123 - 
+      kxyL*G133 - kyyL*G233 + kzzL*G323 + kyzL*(G223 - G333) - 
+      JacPDstandardNth2kzz + JacPDstandardNth3kyz) - 8*Pi*S2;
     
-    CCTK_REAL M3L = gu11*(kxxL*G113 - kyzL*G211 + kxyL*G213 - 
-      kzzL*G311 + kxzL*(-G111 + G313) + JacPDstandardNth1kxz - 
-      JacPDstandardNth3kxx) + gu21*(kxxL*G123 + kyyL*G213 + kxyL*(G113 
-      + G223) + kyzL*G313 + kxzL*G323 + JacPDstandardNth1kyz + 
-      JacPDstandardNth2kxz - 2*(kxzL*G112 + kyzL*G212 + kzzL*G312 + 
-      JacPDstandardNth3kxy)) + gu31*(kxxL*G133 - kyzL*G213 + kxyL*G233 
-      - kzzL*G313 + kxzL*(-G113 + G333) + JacPDstandardNth1kzz - 
-      JacPDstandardNth3kxz) + gu22*(-(kxzL*G122) + kxyL*G123 + 
-      kyyL*G223 - kzzL*G322 + kyzL*(-G222 + G323) + 
+    CCTK_REAL CCTK_ATTRIBUTE_UNUSED M3L = gu11*(kxxL*G113 - kyzL*G211 
+      + kxyL*G213 - kzzL*G311 + kxzL*(-G111 + G313) + 
+      JacPDstandardNth1kxz - JacPDstandardNth3kxx) + gu21*(kxxL*G123 + 
+      kyyL*G213 + kxyL*(G113 + G223) + kyzL*G313 + kxzL*G323 + 
+      JacPDstandardNth1kyz + JacPDstandardNth2kxz - 2*(kxzL*G112 + 
+      kyzL*G212 + kzzL*G312 + JacPDstandardNth3kxy)) + gu31*(kxxL*G133 
+      - kyzL*G213 + kxyL*G233 - kzzL*G313 + kxzL*(-G113 + G333) + 
+      JacPDstandardNth1kzz - JacPDstandardNth3kxz) + gu22*(-(kxzL*G122) + 
+      kxyL*G123 + kyyL*G223 - kzzL*G322 + kyzL*(-G222 + G323) + 
       JacPDstandardNth2kyz - JacPDstandardNth3kyy) + gu32*(-(kxzL*G123) + 
       kxyL*G133 + kyyL*G233 - kzzL*G323 + kyzL*(-G223 + G333) + 
       JacPDstandardNth2kzz - JacPDstandardNth3kyz) - 8*Pi*S3;
diff --git a/ML_ADMConstraints/src/RegisterMoL.cc b/ML_ADMConstraints/src/RegisterMoL.cc
index b582abe..89e458a 100644
--- a/ML_ADMConstraints/src/RegisterMoL.cc
+++ b/ML_ADMConstraints/src/RegisterMoL.cc
@@ -9,7 +9,7 @@ extern "C" void ML_ADMConstraints_RegisterVars(CCTK_ARGUMENTS)
   DECLARE_CCTK_ARGUMENTS;
   DECLARE_CCTK_PARAMETERS;
   
-  CCTK_INT ierr = 0;
+  CCTK_INT ierr CCTK_ATTRIBUTE_UNUSED  = 0;
   
   /* Register all the evolved grid functions with MoL */
   
diff --git a/ML_ADMConstraints/src/Startup.cc b/ML_ADMConstraints/src/Startup.cc
index d3d3ed3..194564b 100644
--- a/ML_ADMConstraints/src/Startup.cc
+++ b/ML_ADMConstraints/src/Startup.cc
@@ -4,7 +4,7 @@
 
 extern "C" int ML_ADMConstraints_Startup(void)
 {
-  const char * banner = "ML_ADMConstraints";
+  const char * banner CCTK_ATTRIBUTE_UNUSED  = "ML_ADMConstraints";
   CCTK_RegisterBanner(banner);
   return 0;
 }