aboutsummaryrefslogtreecommitdiff
path: root/src/ReduceGA.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/ReduceGA.c')
-rw-r--r--src/ReduceGA.c47
1 files changed, 24 insertions, 23 deletions
diff --git a/src/ReduceGA.c b/src/ReduceGA.c
index b114d67..8c90619 100644
--- a/src/ReduceGA.c
+++ b/src/ReduceGA.c
@@ -8,6 +8,7 @@
@version $Header$
@@*/
+#include <math.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
@@ -301,35 +302,35 @@ static int ReduceGridArrays (const cGH *GH,
switch (output_value_type_codes[i])
{
/* out values type switches*/
- case CCTK_VARIABLE_CHAR:
- local_outvals = malloc (1 * sizeof (CCTK_CHAR));
+ case CCTK_VARIABLE_BYTE:
+ local_outvals = malloc (1 * sizeof (CCTK_BYTE));
/* outvals[] contains now the local reduction values */
- memcpy ( local_outvals, (CCTK_CHAR *) output_values[i], 1 * sizeof (CCTK_CHAR));
+ memcpy ( local_outvals, (CCTK_BYTE *) output_values[i], 1 * sizeof (CCTK_BYTE));
if (perform_all_reduce)
{
if (global_operation == 1)
- CACTUS_MPI_ERROR (MPI_Allreduce (local_outvals, (CCTK_CHAR *) output_values[i], 1,
- PUGH_MPI_CHAR, MPI_MAX, pughGH->PUGH_COMM_WORLD));
+ CACTUS_MPI_ERROR (MPI_Allreduce (local_outvals, (CCTK_BYTE *) output_values[i], 1,
+ PUGH_MPI_BYTE, MPI_MAX, pughGH->PUGH_COMM_WORLD));
else if (global_operation == 2)
- CACTUS_MPI_ERROR (MPI_Allreduce (local_outvals, (CCTK_CHAR *) output_values[i], 1,
- PUGH_MPI_CHAR, MPI_MIN, pughGH->PUGH_COMM_WORLD));
+ CACTUS_MPI_ERROR (MPI_Allreduce (local_outvals, (CCTK_BYTE *) output_values[i], 1,
+ PUGH_MPI_BYTE, MPI_MIN, pughGH->PUGH_COMM_WORLD));
else if (global_operation == 3)
- CACTUS_MPI_ERROR (MPI_Allreduce (local_outvals, (CCTK_CHAR *) output_values[i], 1,
- PUGH_MPI_CHAR, MPI_SUM, pughGH->PUGH_COMM_WORLD));
+ CACTUS_MPI_ERROR (MPI_Allreduce (local_outvals, (CCTK_BYTE *) output_values[i], 1,
+ PUGH_MPI_BYTE, MPI_SUM, pughGH->PUGH_COMM_WORLD));
}
else
{
if (global_operation == 1)
- CACTUS_MPI_ERROR (MPI_Reduce (local_outvals, (CCTK_CHAR *) output_values[i], 1,
- PUGH_MPI_CHAR, MPI_MAX, dest_proc, pughGH->PUGH_COMM_WORLD));
+ CACTUS_MPI_ERROR (MPI_Reduce (local_outvals, (CCTK_BYTE *) output_values[i], 1,
+ PUGH_MPI_BYTE, MPI_MAX, dest_proc, pughGH->PUGH_COMM_WORLD));
else if (global_operation == 2)
- CACTUS_MPI_ERROR (MPI_Reduce (local_outvals, (CCTK_CHAR *) output_values[i], 1,
- PUGH_MPI_CHAR, MPI_MIN, dest_proc, pughGH->PUGH_COMM_WORLD));
+ CACTUS_MPI_ERROR (MPI_Reduce (local_outvals, (CCTK_BYTE *) output_values[i], 1,
+ PUGH_MPI_BYTE, MPI_MIN, dest_proc, pughGH->PUGH_COMM_WORLD));
else if (global_operation == 3)
- CACTUS_MPI_ERROR (MPI_Reduce (local_outvals, (CCTK_CHAR *) output_values[i], 1,
- PUGH_MPI_CHAR, MPI_SUM, dest_proc, pughGH->PUGH_COMM_WORLD));
+ CACTUS_MPI_ERROR (MPI_Reduce (local_outvals, (CCTK_BYTE *) output_values[i], 1,
+ PUGH_MPI_BYTE, MPI_SUM, dest_proc, pughGH->PUGH_COMM_WORLD));
}
break;
case CCTK_VARIABLE_INT:
@@ -769,8 +770,8 @@ static int ReduceGridArrays (const cGH *GH,
switch (output_value_type_codes[i])
{
/* out values type switches*/
- case CCTK_VARIABLE_CHAR:
- *( (CCTK_CHAR *) output_values[i]) = *( (CCTK_CHAR *) output_values[i]) / num_points;
+ case CCTK_VARIABLE_BYTE:
+ *( (CCTK_BYTE *) output_values[i]) = *( (CCTK_BYTE *) output_values[i]) / num_points;
break;
case CCTK_VARIABLE_INT:
*( (CCTK_INT *) output_values[i]) = *( (CCTK_INT *) output_values[i]) / num_points;
@@ -846,8 +847,8 @@ static int ReduceGridArrays (const cGH *GH,
switch (output_value_type_codes[i])
{
/* out values type switches*/
- case CCTK_VARIABLE_CHAR:
- *( (CCTK_CHAR *) output_values[i]) = sqrt(*( (CCTK_CHAR *) output_values[i]));
+ case CCTK_VARIABLE_BYTE:
+ *( (CCTK_BYTE *) output_values[i]) = sqrt(*( (CCTK_BYTE *) output_values[i]));
break;
case CCTK_VARIABLE_INT:
*( (CCTK_INT *) output_values[i]) = sqrt( *( (CCTK_INT *) output_values[i]));
@@ -935,8 +936,8 @@ static int ReduceGridArrays (const cGH *GH,
switch (output_value_type_codes[i])
{
/* out values type switches*/
- case CCTK_VARIABLE_CHAR:
- *( (CCTK_CHAR *) output_values[i]) = pow(*( (CCTK_CHAR *) output_values[i]), 1.0/3.0);
+ case CCTK_VARIABLE_BYTE:
+ *( (CCTK_BYTE *) output_values[i]) = pow(*( (CCTK_BYTE *) output_values[i]), 1.0/3.0);
break;
case CCTK_VARIABLE_INT:
*( (CCTK_INT *) output_values[i]) = pow(*( (CCTK_INT *) output_values[i]), 1.0/3.0);
@@ -1024,8 +1025,8 @@ static int ReduceGridArrays (const cGH *GH,
switch (output_value_type_codes[i])
{
/* out values type switches*/
- case CCTK_VARIABLE_CHAR:
- *( (CCTK_CHAR *) output_values[i]) = pow(*( (CCTK_CHAR *) output_values[i]), 1.0/4.0);
+ case CCTK_VARIABLE_BYTE:
+ *( (CCTK_BYTE *) output_values[i]) = pow(*( (CCTK_BYTE *) output_values[i]), 1.0/4.0);
break;
case CCTK_VARIABLE_INT:
*( (CCTK_INT *) output_values[i]) = pow(*( (CCTK_INT *) output_values[i]), 1.0/4.0);