CarpetIOASCII: Allow output in singlemap mode if there is only one map etc.

Allow output in singlemap mode if there is only one map, and in local
mode if there is only one local component.

darcs-hash:20061206163825-dae7b-a359f3f532332d5e5055c76fc9adff9012777b8a.gz

1 files changed, 7 insertions, 2 deletions

diff --git a/Carpet/CarpetIOASCII/src/ioascii.cc b/Carpet/CarpetIOASCII/src/ioascii.cc
index e7046542a..ca2435437 100644
--- a/Carpet/CarpetIOASCII/src/ioascii.cc
+++ b/Carpet/CarpetIOASCII/src/ioascii.cc
@@ -377,11 +377,14 @@ namespace CarpetIOASCII {
       return (-1);
     }
 
-    if (not is_level_mode()) {
+    if (not (is_level_mode() or
+             (is_singlemap_mode() and Carpet::maps == 1) or
+             (is_local_mode() and Carpet::maps == 1 and vhh.at(Carpet::map)->local_components(reflevel) == 1)))
+    {
       CCTK_WARN (1, "OutputVarAs must be called in level mode");
       return -1;
     }
-    assert (is_level_mode());
+    BEGIN_LEVEL_MODE (cctkGH) {
 
     const int group = CCTK_GroupIndexFromVarI (vindex);
     assert (group >= 0);
@@ -950,6 +953,8 @@ namespace CarpetIOASCII {
 
     } while (not done);		// all directions
 
+    } END_LEVEL_MODE;
+
     return 0;
   }