diff options
author | Erik Schnetter <schnetter@cct.lsu.edu> | 2008-07-25 13:45:11 -0500 |
---|---|---|
committer | Erik Schnetter <schnetter@cct.lsu.edu> | 2008-07-25 13:45:11 -0500 |
commit | d66b1882b6156fa13b06c44cf7da7b7db8b7b882 (patch) | |
tree | acd30b432c53a5cf2a63630c8b76b362a10e1c7b /Carpet/CarpetIOASCII | |
parent | df4fc2e0ea535b984bd9f38ad239cfd29ace0333 (diff) | |
parent | c8746c53015a2440ab211cf099e4d8d552cce904 (diff) |
Merge /Users/eschnett/Cbeta/carpet
Diffstat (limited to 'Carpet/CarpetIOASCII')
-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) { |