"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "Graphics/TriD/TriD/Contours.pm" between
PDL-2.076.tar.gz and PDL-2.077.tar.gz

About: PDL (Perl Data Language) aims to turn perl into an efficient numerical language for scientific computing (similar to IDL and MatLab).

Contours.pm  (PDL-2.076):Contours.pm  (PDL-2.077)
skipping to change at line 144 skipping to change at line 144
} }
# #
# The user could also name cvals # The user could also name cvals
# #
my $cvals; my $cvals;
if( !defined($this->{Options}{ContourVals}) || $this->{Options}{ContourVals}-> isempty){ if( !defined($this->{Options}{ContourVals}) || $this->{Options}{ContourVals}-> isempty){
$cvals=zeroes(int(($this->{Options}{ContourMax}-$this->{Options}{ContourMin} )/$this->{Options}{ContourInt}+1)); $cvals=zeroes(int(($this->{Options}{ContourMax}-$this->{Options}{ContourMin} )/$this->{Options}{ContourInt}+1));
$cvals = $cvals->xlinvals($this->{Options}{ContourMin},$this->{Options}{Cont ourMax}); $cvals = $cvals->xlinvals($this->{Options}{ContourMin},$this->{Options}{Cont ourMax});
}else{ }else{
$cvals = $this->{Options}{ContourVals}; $cvals = $this->{Options}{ContourVals};
$this->{Options}{ContourMax}=$cvals->max; $this->{Options}{ContourMax}=$cvals->max->sclr;
$this->{Options}{ContourMin}=$cvals->min; $this->{Options}{ContourMin}=$cvals->min->sclr;
} }
$this->{Options}{ContourVals} = $cvals; $this->{Options}{ContourVals} = $cvals;
print "Cvals = $cvals\n" if($PDL::Graphics::TriD::verbose); print "Cvals = $cvals\n" if($PDL::Graphics::TriD::verbose);
$this->contour_segments($cvals,$data,$grid); $this->contour_segments($cvals,$data,$grid);
$this->addlabels($this->{Options}{Labels}) if(defined $this->{Options}{Labels} ); $this->addlabels($this->{Options}{Labels}) if(defined $this->{Options}{Labels} );
return $this; return $this;
 End of changes. 1 change blocks. 
2 lines changed or deleted 2 lines changed or added

Home  |  About  |  Features  |  All  |  Newest  |  Dox  |  Diffs  |  RSS Feeds  |  Screenshots  |  Comments  |  Imprint  |  Privacy  |  HTTP(S)