aboutsummaryrefslogtreecommitdiff
path: root/src/NormInfFunctions.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/NormInfFunctions.c')
-rw-r--r--src/NormInfFunctions.c84
1 files changed, 42 insertions, 42 deletions
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
generated by cgit v1.2.3 (git 2.39.1) at 2024-05-18 14:29:10 +0000