|
|
Thanks, that's got it down a bit. Now if I could just do Fourier
analysis on that piecewise curve for the ypos variable, I could break it
down into a set of simple waves (probably faster)
Warp! We need your help!
Ben Chambers wrote:
>
> The original being 830 characters (not counting the sig_file{}, but counting
> everything inside it), here's one that's 563 characters:
>
> camera{orthographic location -3*z}light_source{-3*z rgb 1}#local D =
> seed(0);union{#local p =0;#while(p<=8*pi)#local F = pow(sin(p),4/2);#if
> (p<pi)#local G = -F;#else#if (p<3*pi)#local G = -4*cos(p/2);#else#if
> (p<5*pi)#local G=F;#else#if (p<7*pi)#local G=4*cos(p/2);#else#local G
> = -F;#end#end#end#end sphere{<4*sin(p/2),G,4*abs(1-p/(4*pi))>, 1/3#if
> (rand(D)<.5)pigment{rgb z}#else pigment{rgb .5}#end}#local p =
> p+(8*pi/333);#end scale 1/((4+1/3)*2)no_shadow}plane{-z,-2 pigment{average
> pigment_map{[1 bumps turbulence 0.65 ][1/16 rgb 1+z*3]}scale <5, 2, 5>/20}}
>
> ...Chambers
--
signature{
"Grey Knight"
contact{ email "gre### [at] yahoocom" }
site_of_week{ url "http://www.esite-host.com/~rocketmg/" }
}
Post a reply to this message
|
|