diff options
-rwxr-xr-x | Carpet/CarpetIOASCII/src/util/Carpet2ygraphCat.pl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Carpet/CarpetIOASCII/src/util/Carpet2ygraphCat.pl b/Carpet/CarpetIOASCII/src/util/Carpet2ygraphCat.pl index 36320ade0..7e85340df 100755 --- a/Carpet/CarpetIOASCII/src/util/Carpet2ygraphCat.pl +++ b/Carpet/CarpetIOASCII/src/util/Carpet2ygraphCat.pl @@ -130,7 +130,7 @@ while (<CARPETFILE>) if ($currentit != $lastit) { if ($new) { # do not print "Time..." for zero-D data - push(@datatoprint,"\n\n\"Time = ".$time."\n") if ($direction !~ 8); + push(@datatoprint,"\n\n\#Time = ".$time."\n") if ($direction !~ 8); my @sortedcoords = sort numerically (keys %data); foreach my $localcoord (@sortedcoords) { @@ -158,7 +158,7 @@ while (<CARPETFILE>) } # do not print "Time..." for zero-D data -push(@datatoprint,"\n\n\"Time = ".$time."\n") if ($direction !~ 8); +push(@datatoprint,"\n\n\#Time = ".$time."\n") if ($direction !~ 8); my @sortedcoords = sort numerically (keys %data); foreach my $localcoord (@sortedcoords) { |