np / files

     1.1 --- a/np	Thu Oct 15 19:43:32 2009 -0600
     1.2 +++ b/np	Fri Feb 19 15:44:31 2010 -0500
     1.3 @@ -367,7 +367,7 @@
     1.4      @outputs = ();
     1.5  
     1.6      if ($parameters{"dtDataDump"}) {
     1.7 -	my $index = 0;
     1.8 +	my $index = $parameters{"DataDumpNumber"};
     1.9  	for (my $t = $parameters{"InitialTime"};$t <= $parameters{"StopTime"};$t += $parameters{"dtDataDump"}) {
    1.10  	    my $redshift = &ComputeRedshiftFromTime($t*$TimeUnits) if ($parameters{"ComovingCoordinates"});
    1.11  	    %{$outputs[@outputs]} = (redshift => $redshift, time => $t, name => sprintf "DD%04d", $index);
    1.12 @@ -469,7 +469,8 @@
    1.13  			      "InitialTime" => 1,
    1.14  			      "StopTime" => 1,
    1.15  			      "dtDataDump" => 1,
    1.16 -			      "TimeUnits" => 1);
    1.17 +			      "TimeUnits" => 1,
    1.18 +			      "DataDumpNumber" => 1);
    1.19      %arrayValueParameters = ("CosmologyOutputRedshift" => 1);
    1.20  
    1.21      %parameters = ();