aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authoryye00 <yye00@7daa882c-dc44-4453-834e-278d26b18e6a>2004-09-10 00:04:40 +0000
committeryye00 <yye00@7daa882c-dc44-4453-834e-278d26b18e6a>2004-09-10 00:04:40 +0000
commit1acb285767e88d80a673e62f8fb9b299908523be (patch)
tree12280e48b3c0db9d04d3ed85d5b0bb09a3bf377f
parent14107f8ec65fe0b2e51eee4cc24eb1d6481caebe (diff)
fixed casting for COMPLEX and REAL16
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/LocalReduce/trunk@43 7daa882c-dc44-4453-834e-278d26b18e6a
Diffstat
-rw-r--r--src/ReductionAvg.c2
-rw-r--r--src/ReductionCount.c2
-rw-r--r--src/ReductionMax.c2
-rw-r--r--src/ReductionMin.c2
-rw-r--r--src/ReductionNorm1.c2
-rw-r--r--src/ReductionNorm2.c2
-rw-r--r--src/ReductionNorm3.c2
-rw-r--r--src/ReductionNorm4.c2
-rw-r--r--src/ReductionNormInf.c2
-rw-r--r--src/ReductionSum.c2
10 files changed, 10 insertions, 10 deletions
diff --git a/src/ReductionAvg.c b/src/ReductionAvg.c
index 51db04b..279d6bb 100644
--- a/src/ReductionAvg.c
+++ b/src/ReductionAvg.c
@@ -931,7 +931,7 @@ static int ReductionAvg (int N_dims, int operator_handle,
break;
#endif
case CCTK_VARIABLE_COMPLEX:
- ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#ifdef CCTK_COMPLEX8
case CCTK_VARIABLE_COMPLEX8:
diff --git a/src/ReductionCount.c b/src/ReductionCount.c
index 5b5d92c..9bf2262 100644
--- a/src/ReductionCount.c
+++ b/src/ReductionCount.c
@@ -930,7 +930,7 @@ static int ReductionCount (int N_dims, int operator_handle,
break;
#endif
case CCTK_VARIABLE_COMPLEX:
- ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#ifdef CCTK_COMPLEX8
case CCTK_VARIABLE_COMPLEX8:
diff --git a/src/ReductionMax.c b/src/ReductionMax.c
index 6c110eb..0dff3ab 100644
--- a/src/ReductionMax.c
+++ b/src/ReductionMax.c
@@ -930,7 +930,7 @@ static int ReductionMax (int N_dims, int operator_handle,
break;
#endif
case CCTK_VARIABLE_COMPLEX:
- ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#ifdef CCTK_COMPLEX8
case CCTK_VARIABLE_COMPLEX8:
diff --git a/src/ReductionMin.c b/src/ReductionMin.c
index 19ba68f..0d24b6f 100644
--- a/src/ReductionMin.c
+++ b/src/ReductionMin.c
@@ -926,7 +926,7 @@ static int ReductionMin (int N_dims, int operator_handle,
#endif
#ifdef CCTK_REAL16
case CCTK_VARIABLE_REAL16:
- ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_REAL16, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_REAL16, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#endif
case CCTK_VARIABLE_COMPLEX:
diff --git a/src/ReductionNorm1.c b/src/ReductionNorm1.c
index b54952e..9ca7160 100644
--- a/src/ReductionNorm1.c
+++ b/src/ReductionNorm1.c
@@ -971,7 +971,7 @@ static int ReductionL1 (int N_dims, int operator_handle,
break;
#endif
case CCTK_VARIABLE_COMPLEX:
- ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#ifdef CCTK_COMPLEX8
case CCTK_VARIABLE_COMPLEX8:
diff --git a/src/ReductionNorm2.c b/src/ReductionNorm2.c
index 1b4217a..f4b87ce 100644
--- a/src/ReductionNorm2.c
+++ b/src/ReductionNorm2.c
@@ -945,7 +945,7 @@ static int ReductionL2 (int N_dims, int operator_handle,
#endif
#ifdef CCTK_COMPLEX16
case CCTK_VARIABLE_COMPLEX16:
- ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX16, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX16, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#endif
#ifdef CCTK_COMPLEX32
diff --git a/src/ReductionNorm3.c b/src/ReductionNorm3.c
index 07969d5..2f527f2 100644
--- a/src/ReductionNorm3.c
+++ b/src/ReductionNorm3.c
@@ -965,7 +965,7 @@ static int ReductionL3 (int N_dims, int operator_handle,
#endif
#ifdef CCTK_REAL16
case CCTK_VARIABLE_REAL16:
- ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_REAL16, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_REAL16, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#endif
case CCTK_VARIABLE_COMPLEX:
diff --git a/src/ReductionNorm4.c b/src/ReductionNorm4.c
index 4ad4882..7c8323b 100644
--- a/src/ReductionNorm4.c
+++ b/src/ReductionNorm4.c
@@ -933,7 +933,7 @@ static int ReductionL4 (int N_dims, int operator_handle,
break;
#endif
case CCTK_VARIABLE_COMPLEX:
- ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#ifdef CCTK_COMPLEX8
case CCTK_VARIABLE_COMPLEX8:
diff --git a/src/ReductionNormInf.c b/src/ReductionNormInf.c
index fbbad6b..52325ff 100644
--- a/src/ReductionNormInf.c
+++ b/src/ReductionNormInf.c
@@ -910,7 +910,7 @@ static int ReductionLInf (int N_dims, int operator_handle,
break;
#ifdef CCTK_COMPLEX8
case CCTK_VARIABLE_COMPLEX8:
- ITERATE_ON_ARRAY(i,CCTK_REAL8, input_arrays[i], CCTK_COMPLEX8, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL8, input_arrays[i], CCTK_COMPLEX8, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#endif
#ifdef CCTK_COMPLEX16
diff --git a/src/ReductionSum.c b/src/ReductionSum.c
index 78ac920..c3134d4 100644
--- a/src/ReductionSum.c
+++ b/src/ReductionSum.c
@@ -930,7 +930,7 @@ static int ReductionSum (int N_dims, int operator_handle,
break;
#endif
case CCTK_VARIABLE_COMPLEX:
- ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)
+/* ITERATE_ON_ARRAY(i,CCTK_REAL16, input_arrays[i], CCTK_COMPLEX, output_numbers[i], mask_on, input_array_offsets[i], indices, sum_indices, max_iter, iter, flag, actual_indices,input_array_strides, input_array_min_subscripts,product)*/
break;
#ifdef CCTK_COMPLEX8
case CCTK_VARIABLE_COMPLEX8:
generated by cgit v1.2.3 (git 2.39.1) at 2024-05-05 10:18:43 +0000