aboutsummaryrefslogtreecommitdiff
path: root/src/MaxFunctions.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/MaxFunctions.c')
-rw-r--r--src/MaxFunctions.c84
1 files changed, 42 insertions, 42 deletions
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