remove unused variables

git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/LocalReduce/trunk@99 7daa882c-dc44-4453-834e-278d26b18e6a

10 files changed, 338 insertions, 338 deletions

diff --git a/src/AvgFunctions.c b/src/AvgFunctions.c
index 9d7a89a..b2c892a 100644
--- a/src/AvgFunctions.c
+++ b/src/AvgFunctions.c
@@ -23,7 +23,7 @@ int LocalReduce_Avg_BYTE(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -255,8 +255,8 @@ int LocalReduce_Avg_BYTE(int i, int weight_on, const void * const weight, CCTK_I
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -264,7 +264,7 @@ int LocalReduce_Avg_INT(int i, int weight_on, const void * const weight, CCTK_IN
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -492,8 +492,8 @@ int LocalReduce_Avg_INT(int i, int weight_on, const void * const weight, CCTK_IN
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -502,7 +502,7 @@ int LocalReduce_Avg_INT1(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -732,8 +732,8 @@ int LocalReduce_Avg_INT1(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif                                                              
@@ -743,7 +743,7 @@ int LocalReduce_Avg_INT2(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -973,8 +973,8 @@ int LocalReduce_Avg_INT2(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -984,7 +984,7 @@ int LocalReduce_Avg_INT4(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1214,8 +1214,8 @@ int LocalReduce_Avg_INT4(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1225,7 +1225,7 @@ int LocalReduce_Avg_INT8(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1455,8 +1455,8 @@ int LocalReduce_Avg_INT8(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1465,7 +1465,7 @@ int LocalReduce_Avg_REAL(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1695,8 +1695,8 @@ int LocalReduce_Avg_REAL(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -1705,7 +1705,7 @@ int LocalReduce_Avg_REAL4(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1935,8 +1935,8 @@ int LocalReduce_Avg_REAL4(int i, int weight_on, const void * const weight, CCTK_
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1946,7 +1946,7 @@ int LocalReduce_Avg_REAL8(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2177,8 +2177,8 @@ int LocalReduce_Avg_REAL8(int i, int weight_on, const void * const weight, CCTK_
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2188,7 +2188,7 @@ int LocalReduce_Avg_REAL16(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2418,8 +2418,8 @@ int LocalReduce_Avg_REAL16(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2428,7 +2428,7 @@ int LocalReduce_Avg_COMPLEX(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2673,8 +2673,8 @@ int LocalReduce_Avg_COMPLEX(int i, int weight_on, const void * const weight, CCT
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -2684,7 +2684,7 @@ int LocalReduce_Avg_COMPLEX8(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2929,8 +2929,8 @@ int LocalReduce_Avg_COMPLEX8(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2940,7 +2940,7 @@ int LocalReduce_Avg_COMPLEX16(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3185,8 +3185,8 @@ int LocalReduce_Avg_COMPLEX16(int i, int weight_on, const void * const weight, C
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3196,7 +3196,7 @@ int LocalReduce_Avg_COMPLEX32(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3441,8 +3441,8 @@ int LocalReduce_Avg_COMPLEX32(int i, int weight_on, const void * const weight, C
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
diff --git a/src/CountFunctions.c b/src/CountFunctions.c
index 724d6db..8c10d0a 100644
--- a/src/CountFunctions.c
+++ b/src/CountFunctions.c
@@ -21,7 +21,7 @@ int LocalReduce_Count_BYTE(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -259,7 +259,7 @@ int LocalReduce_Count_INT(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -495,7 +495,7 @@ int LocalReduce_Count_INT1(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -734,7 +734,7 @@ int LocalReduce_Count_INT2(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -973,7 +973,7 @@ int LocalReduce_Count_INT4(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1212,7 +1212,7 @@ int LocalReduce_Count_INT8(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1450,7 +1450,7 @@ int LocalReduce_Count_REAL(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1688,7 +1688,7 @@ int LocalReduce_Count_REAL4(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1927,7 +1927,7 @@ int LocalReduce_Count_REAL8(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2167,7 +2167,7 @@ int LocalReduce_Count_REAL16(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2405,7 +2405,7 @@ int LocalReduce_Count_COMPLEX(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2659,7 +2659,7 @@ int LocalReduce_Count_COMPLEX8(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2913,7 +2913,7 @@ int LocalReduce_Count_COMPLEX16(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3167,7 +3167,7 @@ int LocalReduce_Count_COMPLEX32(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
diff --git a/src/MaxFunctions.c b/src/MaxFunctions.c
index 9fd7d57..726d6bd 100644
--- a/src/MaxFunctions.c
+++ b/src/MaxFunctions.c
@@ -23,7 +23,7 @@ int LocalReduce_Max_BYTE(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -255,8 +255,8 @@ int LocalReduce_Max_BYTE(int i, int weight_on, const void * const weight, CCTK_I
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -264,7 +264,7 @@ int LocalReduce_Max_INT(int i, int weight_on, const void * const weight, CCTK_IN
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -492,8 +492,8 @@ int LocalReduce_Max_INT(int i, int weight_on, const void * const weight, CCTK_IN
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -502,7 +502,7 @@ int LocalReduce_Max_INT1(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -732,8 +732,8 @@ int LocalReduce_Max_INT1(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif                                                              
@@ -743,7 +743,7 @@ int LocalReduce_Max_INT2(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -973,8 +973,8 @@ int LocalReduce_Max_INT2(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -984,7 +984,7 @@ int LocalReduce_Max_INT4(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1214,8 +1214,8 @@ int LocalReduce_Max_INT4(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1225,7 +1225,7 @@ int LocalReduce_Max_INT8(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1455,8 +1455,8 @@ int LocalReduce_Max_INT8(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1465,7 +1465,7 @@ int LocalReduce_Max_REAL(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1695,8 +1695,8 @@ int LocalReduce_Max_REAL(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -1705,7 +1705,7 @@ int LocalReduce_Max_REAL4(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1935,8 +1935,8 @@ int LocalReduce_Max_REAL4(int i, int weight_on, const void * const weight, CCTK_
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1946,7 +1946,7 @@ int LocalReduce_Max_REAL8(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2177,8 +2177,8 @@ int LocalReduce_Max_REAL8(int i, int weight_on, const void * const weight, CCTK_
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2188,7 +2188,7 @@ int LocalReduce_Max_REAL16(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2418,8 +2418,8 @@ int LocalReduce_Max_REAL16(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2428,7 +2428,7 @@ int LocalReduce_Max_COMPLEX(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2673,8 +2673,8 @@ int LocalReduce_Max_COMPLEX(int i, int weight_on, const void * const weight, CCT
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -2684,7 +2684,7 @@ int LocalReduce_Max_COMPLEX8(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2929,8 +2929,8 @@ int LocalReduce_Max_COMPLEX8(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2940,7 +2940,7 @@ int LocalReduce_Max_COMPLEX16(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3185,8 +3185,8 @@ int LocalReduce_Max_COMPLEX16(int i, int weight_on, const void * const weight, C
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3196,7 +3196,7 @@ int LocalReduce_Max_COMPLEX32(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3441,8 +3441,8 @@ int LocalReduce_Max_COMPLEX32(int i, int weight_on, const void * const weight, C
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
diff --git a/src/MinFunctions.c b/src/MinFunctions.c
index f3b8204..998d666 100644
--- a/src/MinFunctions.c
+++ b/src/MinFunctions.c
@@ -21,7 +21,7 @@ int LocalReduce_Min_BYTE(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -252,8 +252,8 @@ int LocalReduce_Min_BYTE(int i, int weight_on, const void * const weight, CCTK_I
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -261,7 +261,7 @@ int LocalReduce_Min_INT(int i, int weight_on, const void * const weight, CCTK_IN
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -497,7 +497,7 @@ int LocalReduce_Min_INT1(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -736,7 +736,7 @@ int LocalReduce_Min_INT2(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -975,7 +975,7 @@ int LocalReduce_Min_INT4(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1214,7 +1214,7 @@ int LocalReduce_Min_INT8(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1452,7 +1452,7 @@ int LocalReduce_Min_REAL(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1690,7 +1690,7 @@ int LocalReduce_Min_REAL4(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1929,7 +1929,7 @@ int LocalReduce_Min_REAL8(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2169,7 +2169,7 @@ int LocalReduce_Min_REAL16(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2407,7 +2407,7 @@ int LocalReduce_Min_COMPLEX(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2661,7 +2661,7 @@ int LocalReduce_Min_COMPLEX8(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2915,7 +2915,7 @@ int LocalReduce_Min_COMPLEX16(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3169,7 +3169,7 @@ int LocalReduce_Min_COMPLEX32(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
diff --git a/src/Norm1Functions.c b/src/Norm1Functions.c
index 8f2082d..aabd7b6 100644
--- a/src/Norm1Functions.c
+++ b/src/Norm1Functions.c
@@ -22,7 +22,7 @@ int LocalReduce_Norm1_BYTE(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -290,8 +290,8 @@ int LocalReduce_Norm1_BYTE(int i, int weight_on, const void * const weight, CCTK
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -299,7 +299,7 @@ int LocalReduce_Norm1_INT(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -564,8 +564,8 @@ int LocalReduce_Norm1_INT(int i, int weight_on, const void * const weight, CCTK_
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -574,7 +574,7 @@ int LocalReduce_Norm1_INT1(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -841,8 +841,8 @@ int LocalReduce_Norm1_INT1(int i, int weight_on, const void * const weight, CCTK
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif                                                              
@@ -852,7 +852,7 @@ int LocalReduce_Norm1_INT2(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1119,8 +1119,8 @@ int LocalReduce_Norm1_INT2(int i, int weight_on, const void * const weight, CCTK
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1130,7 +1130,7 @@ int LocalReduce_Norm1_INT4(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1397,8 +1397,8 @@ int LocalReduce_Norm1_INT4(int i, int weight_on, const void * const weight, CCTK
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1408,7 +1408,7 @@ int LocalReduce_Norm1_INT8(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1675,8 +1675,8 @@ int LocalReduce_Norm1_INT8(int i, int weight_on, const void * const weight, CCTK
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1685,7 +1685,7 @@ int LocalReduce_Norm1_REAL(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1952,8 +1952,8 @@ int LocalReduce_Norm1_REAL(int i, int weight_on, const void * const weight, CCTK
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -1962,7 +1962,7 @@ int LocalReduce_Norm1_REAL4(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2229,8 +2229,8 @@ int LocalReduce_Norm1_REAL4(int i, int weight_on, const void * const weight, CCT
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2240,7 +2240,7 @@ int LocalReduce_Norm1_REAL8(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2508,8 +2508,8 @@ int LocalReduce_Norm1_REAL8(int i, int weight_on, const void * const weight, CCT
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2519,7 +2519,7 @@ int LocalReduce_Norm1_REAL16(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2786,8 +2786,8 @@ int LocalReduce_Norm1_REAL16(int i, int weight_on, const void * const weight, CC
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2796,7 +2796,7 @@ int LocalReduce_Norm1_COMPLEX(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3058,8 +3058,8 @@ int LocalReduce_Norm1_COMPLEX(int i, int weight_on, const void * const weight, C
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -3069,7 +3069,7 @@ int LocalReduce_Norm1_COMPLEX8(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3281,8 +3281,8 @@ int LocalReduce_Norm1_COMPLEX8(int i, int weight_on, const void * const weight,
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3292,7 +3292,7 @@ int LocalReduce_Norm1_COMPLEX16(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3554,8 +3554,8 @@ int LocalReduce_Norm1_COMPLEX16(int i, int weight_on, const void * const weight,
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3565,7 +3565,7 @@ int LocalReduce_Norm1_COMPLEX32(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3777,8 +3777,8 @@ int LocalReduce_Norm1_COMPLEX32(int i, int weight_on, const void * const weight,
     #endif
   }
 
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
diff --git a/src/Norm2Functions.c b/src/Norm2Functions.c
index bcbd458..d395f0f 100644
--- a/src/Norm2Functions.c
+++ b/src/Norm2Functions.c
@@ -22,7 +22,7 @@ int LocalReduce_Norm2_BYTE(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -290,8 +290,8 @@ int LocalReduce_Norm2_BYTE(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -299,7 +299,7 @@ int LocalReduce_Norm2_INT(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -564,8 +564,8 @@ int LocalReduce_Norm2_INT(int i, int weight_on, const void * const weight, CCTK_
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -574,7 +574,7 @@ int LocalReduce_Norm2_INT1(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -841,8 +841,8 @@ int LocalReduce_Norm2_INT1(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif                                                              
@@ -852,7 +852,7 @@ int LocalReduce_Norm2_INT2(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1119,8 +1119,8 @@ int LocalReduce_Norm2_INT2(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1130,7 +1130,7 @@ int LocalReduce_Norm2_INT4(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1397,8 +1397,8 @@ int LocalReduce_Norm2_INT4(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1408,7 +1408,7 @@ int LocalReduce_Norm2_INT8(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1675,8 +1675,8 @@ int LocalReduce_Norm2_INT8(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1685,7 +1685,7 @@ int LocalReduce_Norm2_REAL(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1952,8 +1952,8 @@ int LocalReduce_Norm2_REAL(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -1962,7 +1962,7 @@ int LocalReduce_Norm2_REAL4(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2229,8 +2229,8 @@ int LocalReduce_Norm2_REAL4(int i, int weight_on, const void * const weight, CCT
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2240,7 +2240,7 @@ int LocalReduce_Norm2_REAL8(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2508,8 +2508,8 @@ int LocalReduce_Norm2_REAL8(int i, int weight_on, const void * const weight, CCT
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2519,7 +2519,7 @@ int LocalReduce_Norm2_REAL16(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2786,8 +2786,8 @@ int LocalReduce_Norm2_REAL16(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2796,7 +2796,7 @@ int LocalReduce_Norm2_COMPLEX(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3077,8 +3077,8 @@ int LocalReduce_Norm2_COMPLEX(int i, int weight_on, const void * const weight, C
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -3088,7 +3088,7 @@ int LocalReduce_Norm2_COMPLEX8(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3369,8 +3369,8 @@ int LocalReduce_Norm2_COMPLEX8(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3380,7 +3380,7 @@ int LocalReduce_Norm2_COMPLEX16(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3661,8 +3661,8 @@ int LocalReduce_Norm2_COMPLEX16(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3672,7 +3672,7 @@ int LocalReduce_Norm2_COMPLEX32(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3953,8 +3953,8 @@ int LocalReduce_Norm2_COMPLEX32(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
diff --git a/src/Norm3Functions.c b/src/Norm3Functions.c
index c6598a5..e644db8 100644
--- a/src/Norm3Functions.c
+++ b/src/Norm3Functions.c
@@ -27,7 +27,7 @@ int LocalReduce_Norm3_BYTE(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -294,8 +294,8 @@ int LocalReduce_Norm3_BYTE(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -303,7 +303,7 @@ int LocalReduce_Norm3_INT(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -567,8 +567,8 @@ int LocalReduce_Norm3_INT(int i, int weight_on, const void * const weight, CCTK_
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -577,7 +577,7 @@ int LocalReduce_Norm3_INT1(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -843,8 +843,8 @@ int LocalReduce_Norm3_INT1(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif                                                              
@@ -854,7 +854,7 @@ int LocalReduce_Norm3_INT2(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1120,8 +1120,8 @@ int LocalReduce_Norm3_INT2(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1131,7 +1131,7 @@ int LocalReduce_Norm3_INT4(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1397,8 +1397,8 @@ int LocalReduce_Norm3_INT4(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1408,7 +1408,7 @@ int LocalReduce_Norm3_INT8(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1674,8 +1674,8 @@ int LocalReduce_Norm3_INT8(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1684,7 +1684,7 @@ int LocalReduce_Norm3_REAL(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1950,8 +1950,8 @@ int LocalReduce_Norm3_REAL(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -1960,7 +1960,7 @@ int LocalReduce_Norm3_REAL4(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2226,8 +2226,8 @@ int LocalReduce_Norm3_REAL4(int i, int weight_on, const void * const weight, CCT
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2237,7 +2237,7 @@ int LocalReduce_Norm3_REAL8(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2504,8 +2504,8 @@ int LocalReduce_Norm3_REAL8(int i, int weight_on, const void * const weight, CCT
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2515,7 +2515,7 @@ int LocalReduce_Norm3_REAL16(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2781,8 +2781,8 @@ int LocalReduce_Norm3_REAL16(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2791,7 +2791,7 @@ int LocalReduce_Norm3_COMPLEX(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3072,8 +3072,8 @@ int LocalReduce_Norm3_COMPLEX(int i, int weight_on, const void * const weight, C
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -3083,7 +3083,7 @@ int LocalReduce_Norm3_COMPLEX8(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3364,8 +3364,8 @@ int LocalReduce_Norm3_COMPLEX8(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3375,7 +3375,7 @@ int LocalReduce_Norm3_COMPLEX16(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3656,8 +3656,8 @@ int LocalReduce_Norm3_COMPLEX16(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3667,7 +3667,7 @@ int LocalReduce_Norm3_COMPLEX32(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3948,8 +3948,8 @@ int LocalReduce_Norm3_COMPLEX32(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
diff --git a/src/Norm4Functions.c b/src/Norm4Functions.c
index 2114b41..17651da 100644
--- a/src/Norm4Functions.c
+++ b/src/Norm4Functions.c
@@ -22,7 +22,7 @@ int LocalReduce_Norm4_BYTE(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -289,8 +289,8 @@ int LocalReduce_Norm4_BYTE(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -298,7 +298,7 @@ int LocalReduce_Norm4_INT(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -562,8 +562,8 @@ int LocalReduce_Norm4_INT(int i, int weight_on, const void * const weight, CCTK_
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -572,7 +572,7 @@ int LocalReduce_Norm4_INT1(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -838,8 +838,8 @@ int LocalReduce_Norm4_INT1(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif                                                              
@@ -849,7 +849,7 @@ int LocalReduce_Norm4_INT2(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1115,8 +1115,8 @@ int LocalReduce_Norm4_INT2(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1126,7 +1126,7 @@ int LocalReduce_Norm4_INT4(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1392,8 +1392,8 @@ int LocalReduce_Norm4_INT4(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1403,7 +1403,7 @@ int LocalReduce_Norm4_INT8(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1669,8 +1669,8 @@ int LocalReduce_Norm4_INT8(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1679,7 +1679,7 @@ int LocalReduce_Norm4_REAL(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1945,8 +1945,8 @@ int LocalReduce_Norm4_REAL(int i, int weight_on, const void * const weight, CCTK
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -1955,7 +1955,7 @@ int LocalReduce_Norm4_REAL4(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2221,8 +2221,8 @@ int LocalReduce_Norm4_REAL4(int i, int weight_on, const void * const weight, CCT
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2232,7 +2232,7 @@ int LocalReduce_Norm4_REAL8(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2499,8 +2499,8 @@ int LocalReduce_Norm4_REAL8(int i, int weight_on, const void * const weight, CCT
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2510,7 +2510,7 @@ int LocalReduce_Norm4_REAL16(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2776,8 +2776,8 @@ int LocalReduce_Norm4_REAL16(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2786,7 +2786,7 @@ int LocalReduce_Norm4_COMPLEX(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3097,8 +3097,8 @@ int LocalReduce_Norm4_COMPLEX(int i, int weight_on, const void * const weight, C
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -3108,7 +3108,7 @@ int LocalReduce_Norm4_COMPLEX8(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3412,8 +3412,8 @@ int LocalReduce_Norm4_COMPLEX8(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3423,7 +3423,7 @@ int LocalReduce_Norm4_COMPLEX16(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3727,8 +3727,8 @@ int LocalReduce_Norm4_COMPLEX16(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3738,7 +3738,7 @@ int LocalReduce_Norm4_COMPLEX32(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -4039,8 +4039,8 @@ int LocalReduce_Norm4_COMPLEX32(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
diff --git a/src/NormInfFunctions.c b/src/NormInfFunctions.c
index 0c61247..2897c96 100644
--- a/src/NormInfFunctions.c
+++ b/src/NormInfFunctions.c
@@ -22,7 +22,7 @@ int LocalReduce_NormInf_BYTE(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -325,8 +325,8 @@ int LocalReduce_NormInf_BYTE(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -334,7 +334,7 @@ int LocalReduce_NormInf_INT(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -634,8 +634,8 @@ int LocalReduce_NormInf_INT(int i, int weight_on, const void * const weight, CCT
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -644,7 +644,7 @@ int LocalReduce_NormInf_INT1(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -946,8 +946,8 @@ int LocalReduce_NormInf_INT1(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif                                                              
@@ -957,7 +957,7 @@ int LocalReduce_NormInf_INT2(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1259,8 +1259,8 @@ int LocalReduce_NormInf_INT2(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1270,7 +1270,7 @@ int LocalReduce_NormInf_INT4(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1572,8 +1572,8 @@ int LocalReduce_NormInf_INT4(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1583,7 +1583,7 @@ int LocalReduce_NormInf_INT8(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1885,8 +1885,8 @@ int LocalReduce_NormInf_INT8(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -1895,7 +1895,7 @@ int LocalReduce_NormInf_REAL(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2197,8 +2197,8 @@ int LocalReduce_NormInf_REAL(int i, int weight_on, const void * const weight, CC
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -2207,7 +2207,7 @@ int LocalReduce_NormInf_REAL4(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2509,8 +2509,8 @@ int LocalReduce_NormInf_REAL4(int i, int weight_on, const void * const weight, C
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2520,7 +2520,7 @@ int LocalReduce_NormInf_REAL8(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2823,8 +2823,8 @@ int LocalReduce_NormInf_REAL8(int i, int weight_on, const void * const weight, C
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -2834,7 +2834,7 @@ int LocalReduce_NormInf_REAL16(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3136,8 +3136,8 @@ int LocalReduce_NormInf_REAL16(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3146,7 +3146,7 @@ int LocalReduce_NormInf_COMPLEX(int i, int weight_on, const void * const weight,
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3423,8 +3423,8 @@ int LocalReduce_NormInf_COMPLEX(int i, int weight_on, const void * const weight,
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 
@@ -3434,7 +3434,7 @@ int LocalReduce_NormInf_COMPLEX8(int i, int weight_on, const void * const weight
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3691,8 +3691,8 @@ int LocalReduce_NormInf_COMPLEX8(int i, int weight_on, const void * const weight
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3702,7 +3702,7 @@ int LocalReduce_NormInf_COMPLEX16(int i, int weight_on, const void * const weigh
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3979,8 +3979,8 @@ int LocalReduce_NormInf_COMPLEX16(int i, int weight_on, const void * const weigh
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
@@ -3990,7 +3990,7 @@ int LocalReduce_NormInf_COMPLEX32(int i, int weight_on, const void * const weigh
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -4257,8 +4257,8 @@ int LocalReduce_NormInf_COMPLEX32(int i, int weight_on, const void * const weigh
     break;
     #endif
   }
-  ierr = Util_TableSetInt(param_table_handle, num_points, "num_points");
-  ierr = Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
+  Util_TableSetInt(param_table_handle, num_points, "num_points");
+  Util_TableSetReal(param_table_handle, weight_sum, "weight_sum");
   return 0;
 }
 #endif
diff --git a/src/SumFunctions.c b/src/SumFunctions.c
index a01a5ce..588b595 100644
--- a/src/SumFunctions.c
+++ b/src/SumFunctions.c
@@ -22,7 +22,7 @@ int LocalReduce_Sum_BYTE(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -260,7 +260,7 @@ int LocalReduce_Sum_INT(int i, int weight_on, const void * const weight, CCTK_IN
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -496,7 +496,7 @@ int LocalReduce_Sum_INT1(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -735,7 +735,7 @@ int LocalReduce_Sum_INT2(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -974,7 +974,7 @@ int LocalReduce_Sum_INT4(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1213,7 +1213,7 @@ int LocalReduce_Sum_INT8(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1451,7 +1451,7 @@ int LocalReduce_Sum_REAL(int i, int weight_on, const void * const weight, CCTK_I
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1689,7 +1689,7 @@ int LocalReduce_Sum_REAL4(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -1928,7 +1928,7 @@ int LocalReduce_Sum_REAL8(int i, int weight_on, const void * const weight, CCTK_
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2168,7 +2168,7 @@ int LocalReduce_Sum_REAL16(int i, int weight_on, const void * const weight, CCTK
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2406,7 +2406,7 @@ int LocalReduce_Sum_COMPLEX(int i, int weight_on, const void * const weight, CCT
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2660,7 +2660,7 @@ int LocalReduce_Sum_COMPLEX8(int i, int weight_on, const void * const weight, CC
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -2914,7 +2914,7 @@ int LocalReduce_Sum_COMPLEX16(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;
@@ -3168,7 +3168,7 @@ int LocalReduce_Sum_COMPLEX32(int i, int weight_on, const void * const weight, C
 {
   int iter = 0;
   int sum_indices = 0;
-  int flag, product, j, k, ierr;
+  int flag, product, j, k;
 
   /* Weight variables */
   CCTK_REAL weight_sum = 0.0;