CarpetIO*: Output complex numbers as pair of real numbers

Don't use the (real,imag) notation that C++ would use by default.

1 files changed, 11 insertions, 0 deletions

diff --git a/Carpet/CarpetIOASCII/src/ioascii.cc b/Carpet/CarpetIOASCII/src/ioascii.cc
index c7dab0add..a257975a6 100644
--- a/Carpet/CarpetIOASCII/src/ioascii.cc
+++ b/Carpet/CarpetIOASCII/src/ioascii.cc
@@ -1467,12 +1467,23 @@ namespace CarpetIOASCII {
             const gdata* gfdata = gfdatas.at(n);
             os << (n==0 ? "\t" : " ");
             switch (specific_cactus_type(vartype)) {
+#define CARPET_NO_COMPLEX
 #define TYPECASE(N,T)                                   \
               case N:                                   \
                 os << (*(const data<T>*)gfdata)[index]; \
                 break;
 #include "typecase.hh"
 #undef TYPECASE
+#undef CARPET_NO_COMPLEX
+#define CARPET_COMPLEX
+#define TYPECASE(N,T)                                                   \
+              case N:                                                   \
+                os << real((*(const data<T>*)gfdata)[index]) << " "     \
+                   << imag((*(const data<T>*)gfdata)[index]);           \
+                break;
+#include "typecase.hh"
+#undef TYPECASE
+#undef CARPET_COMPLEX
             default:
               UnsupportedVarType(vi);
             }