diff options
author | baiotti <schnetter@cct.lsu.edu> | 2006-09-26 14:09:00 +0000 |
---|---|---|
committer | baiotti <schnetter@cct.lsu.edu> | 2006-09-26 14:09:00 +0000 |
commit | 8a42fa7f686d57faaa748bf4f2087c12eda76c38 (patch) | |
tree | 63cddd0cf4656cd1dbe12d53c13e73b83ff6691e /Carpet/CarpetIOASCII | |
parent | 2f97a58ce46ebd4dfc2a10ce7a2ecf2e401b56ba (diff) |
CarpetIOASCII/src/util/Carpet2ygraphCat.pl
Make the output files of the script readable by gnuplot as well. This script is not meant for gnuplot, but it doesn't harm if also gnuplot can read the results. The changes consist only in adding an extra new line between time sets.
darcs-hash:20060926140906-d5812-7ab1b49cf818e52166f54d7d7a0ce898e9ba4928.gz
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 f78fa87cd..08eed61cd 100755 --- a/Carpet/CarpetIOASCII/src/util/Carpet2ygraphCat.pl +++ b/Carpet/CarpetIOASCII/src/util/Carpet2ygraphCat.pl @@ -93,7 +93,7 @@ while (<CARPETFILE>) if ($currentit != $lastit) { if ($new) { # do not print "Time..." for zero-D data - push(@datatoprint,"\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) { @@ -115,7 +115,7 @@ while (<CARPETFILE>) } # do not print "Time..." for zero-D data -push(@datatoprint,"\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) { |