diff options
Diffstat (limited to 'src/AvgFunctions.c')
-rw-r--r-- | src/AvgFunctions.c | 84 |
1 files changed, 42 insertions, 42 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 |