diff options
Diffstat (limited to 'src/ReductionNorm2.c')
| -rw-r--r-- | src/ReductionNorm2.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/ReductionNorm2.c b/src/ReductionNorm2.c index 222ab3c..9cb1a4f 100644 --- a/src/ReductionNorm2.c +++ b/src/ReductionNorm2.c @@ -137,6 +137,7 @@ static int ReductionL2 (int N_dims, int operator_handle, int i, j, k, flag, product, num_points; int ierr; int * iters_per_dim; + int global_calling = 0; /* indices to hold the temp indices of size N_dims and iteration indices*/ int * indices; @@ -1241,8 +1242,9 @@ static int ReductionL2 (int N_dims, int operator_handle, num_points--; - /* store the number of points in the paramater table */ - if ( Util_TableQueryNKeys(param_table_handle) != 0) + /* store the number of points in the paramater table and perform division */ + ierr = Util_TableGetInt(param_table_handle, &global_calling, "global_calling"); + if ( global_calling != 0) { ierr = Util_TableSetInt(param_table_handle, num_points, "num_points"); ierr = Util_TableSetInt(param_table_handle, 3,"mpi_operation"); |