You have two messages there: a warning about whichND and an error from TriD.
The list context behavior of whichND is deprecated in 2.4.10, because it causes
more heartache than it solves; refer to the whichND docs for 2.4.10. The
warning should be emitted harmlessly. The "pod" is the documentation supplied
with PDL itself.
You can reproduce the old behavior with
($x,$y,$z) = whichND($tt=($a==-0)&($a!=255))->mv(0,-1)->dog;
which will work and not give you the warning.
Or you can say "$PDL::whichND='l'", which will enable the old behavior. But
that is a stopgap and may (will) stop working in a future release.
The error appears to be something going on in your points3d call, which someone
else will have to diagnose.
Cheers,
Craig
On Apr 4, 2012, at 10:40 AM, MARK BAKER wrote:
> one of my scripts based on Based on the Volume rendering is not working and
> was working fine
> ... Robin Williams Demo in 3Dgal is not working as well in the 3d Demos ...
>
> here is the script
>
> #############################################################
> use PDL::Image2D;
> use PDL; use PDL::Graphics::TriD; keeptwiddling3d();
>
> for $f (1..628) {
> $b=zeros(90,90,90);$b=sin($f*20.36000*$b->rvals+$b,
> )**cos(20.27000*$b->rvals)**$b;$c= -0; ##}
> $a=byte(($b<$c));foreach $jj(reverse
> 1..4){$t=($a->slice("0:-2")<<$_);$t+=$a->slice("1:-1") ;
> $a = $t->mv(0,1);
> for $rr (1..62) {
> [($x,$y,$z)= whichND($tt=($a == -0) & ($a != 255))];
> $r = sin($rr)*xvals($x);
> $g = $rr*tan(($y));
> $b = $rr*tan($z);
> points3d [$x,$y,$z],[$r,$g,$b];
> }
> }}
> ################################################################
>
> it says I need a package for whichND is there a module im not referencing ???
>
> here is the warrning I get
>
> whichND: WARNING - list context deprecated. Set $PDL::whichND. Details in
> pod.Ca
> n't call method "dims" without a package or object reference at
> C:/strawberry/pe
> rl/site/lib/PDL/Graphics/TriD.pm line 739, <DATA> line 387.
>
> where and what is a pod ?
>
> Mark R Baker
> _______________________________________________
> Perldl mailing list
> [email protected]
> http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
_______________________________________________
Perldl mailing list
[email protected]
http://mailman.jach.hawaii.edu/mailman/listinfo/perldl
