|
Fractal of the Day
by Jim Muth
|
|
Fractal visionaries and enthusiasts: While cleaning the muddy coating from the floor in the basement, my thoughts drifted to jollier things. What could be more jolly than a ride on a carousel, holding a big puff of pink cotton-candy as you go round and round? Nothing could. But we have no carousel, so we'll have to settle for a view of a fractal carousel, which is certainly better than nothing. Today's fractal picture of an abstract carousel gives such a view. It features a midget that exists deep down in the oversized fractal that results when the formula 2(Z^(-2))+0.3755(Z^2)+(1/C) is iterated. Actually, I named today's picture "Carousel" because of the carnival-like effect of all the bits and pieces of color. And the outer pink ring is indeed close to the color of cotton candy. But with all good news comes some bad news. The bad news about today's FOTD is that it is one of the slowest in months, taking well over an hour to render even on a Pentium 200mhz. The bad news is relieved however by the fact that the GIF image file has been posted to: The fractal weather remained cloudy and very damp all day. The temperature of 78F (25.5C) was pleasant enough, but the wet grass kept the cats confined to the porch all afternoon. And the wet basement kept me confined down there on mopping duty for a good part of the afternoon. The fractosophy is still simmering, but it's not yet finished. It's hard to wax philosophical when one is cleaning a layer of sticky mud from the basement floor. If all goes well, the philosophy will be ready to be made public this weekend; if not, who knows when it will appear. But regardless of when the philosophy appears, I'll appear again tomorrow at this same time and place. Until then, take care, and the number of fractals is more infinite than infinity. Jim Muth jamth@mindspring.com |
START 20.0 PAR-FORMULA FILE================================
Carousel { ; time=1:07:48.42 -- SF5 on a P200
; Version 2000 Patchlevel 9
reset=2000 type=formula formulafile=critical.frm
formulaname=MandelbrotMix4 function=recip passes=1
center-mag=-1572.36433456487/+5948.717668412058/1392\
66.5/1/-157.5 params=2/-2/0.3755/2/0/0 float=y
maxiter=10000 inside=0 logmap=1405 periodicity=0
colors=000OmR<3>HscGugEvjCxmByp<2>O1C<7>cBceCggEj<3>\
oIx<2>7cJ<3>AoHBrGCuGCxG<2>FQv<7>L_fL`dMab<3>OeV<3>R\
ULRRJSWN<2>Vk`<8>hS`jQ`kO`<3>qG`LPh<7>DgWCjVBlT<2>8s\
O7uN8lV<2>BOr<3>WXU<7>RURQURQUR<3>OTQ<3>WWKYXI_XH<3>\
HWfCWm7Ws3Wy<3>5iU5lM5oF<4>WeP`dQebSk`UpZWzVUzWZ<3>k\
VLgUHcUE_UAXU7<2>8514I90VH<3>6ZO7ZP8hRA`T<2>DbX<3>ZR\
McOKaLHcIErUBXC8V95T62K30T43U56e69V7B<3>XBMYCPYDSZEU\
ZFw_Gr_GmZIhYKP<2>VQ6VR0WS1<5>_X3`Y3aY3<3>c`4<3>QiIM\
kLJmOGoRXpHmq7<4>PvM<2>ByV<3>`z`fzalzb<3>_zgXziUzj<2\
>Lzm<3>_zUWzL<3>SzKSzKQzO
}
frm:MandelbrotMix4 {; Jim Muth
a=real(p1), b=imag(p1), d=real(p2), f=imag(p2),
g=1/f, h=1/d, j=1/(f-b), z=(-a*b*g*h)^j,
k=real(p3)+1, l=imag(p3)+100, c=fn1(pixel):
z=k*((a*(z^b))+(d*(z^f)))+c,
|z| < l
}
END 20.0 PAR-FORMULA FILE==================================
|
times.
