Hi im trying to rotate this obital so that i can place them all over in balanced arrangements of orbs like the chemistry book says but i dont know how to rotate a matrix in all directions, can anybody help heres the code
################################################## use PDL; use PDL::Complex; use PDL::Graphics::TriD; use PDL::Math; keeptwiddling3d; $PDL::BIGPDL=1; ## remember this can crash the computer if you dont have enough RAM and swap in linux or pagefile in windows for (;;){ $c = (400) ; ## speed for $phase(-360..360) { ## 360 $phases = $phase*0.0000001; $frequency = ($c**-1); $n= (6.28*$c*$frequency+($phases)); $photons = 4178; ### [Density] 2444 4178 $t=rvals(exp(zeros($photons))); $cz=-1**$t*$c; # -1**$t*$c $cy=-1**sin($t*$c); #-1**$c*sin($t*$c) $cx=-1**$c*sin(rvals($t))*$c; #-1**$c*bessj0(rvals($t,{Centre=>[0]}))*$c; $w=$cz-$cy-$cx; $g=sin($w); #sin $r=cos($cy+$c+$cz); #cos $b=cos($w); #cos $i=($cz-$cx-$cy); $q=$c*($i*$n); $xx = $b*sin($b); ### $yy = $r*($q); ### $zz = $g*cos($g); ### $xxx = $xx*cos($yy)*sin($zz); ### $yyy = $xx*sin($yy)*sin($zz); ### $zzz = $xx*cos($zz); points3d[$xxx,$yyy,$zzz],[$r,$g,$b]; ########################################################## if i can get this orbital to rotate in all directions, then i can represent atoms better cause they are balanced by the number of electrons so the orbs repeal each other, please any help would be appreciated !!! Best, -Mark Baker
_______________________________________________ pdl-general mailing list pdl-general@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/pdl-general