|
Fractal of the Day
by Jim Muth
|
|
Fractal visionaries and enthusiasts: An extremely busy day means a hasty fractal and short discussion. Today's curious scene lies in the infinite spiral of the Z^(sqrt(2))+C Mandeloid, a short distance out from the default view. The parent fractal is a distorted bay with an even more distorted main bud. Today's scene lies in the left branch of the valley between the bay and bud. I named the picture "Breaking-up Midget" when I saw how broken the surrounding elements are. I can honestly rate the image no higher than 4, since I put almost no effort into it. The 11-minute parameter file makes a download preferable. The download may be found at: The fractal weather today was partly cloudy and very muggy, with a temperature of 84F (29C) that was perfect for both fractal cats and grass trimming. The rain held off until after dark, when a heavy thunder-storm skimmed past just to the east. Luckily the rain was not enough to run into the basement. I had no time for philosophy today, but I'm accumulating a great backlog of ideas, which sooner or later will be made public. Despite the rush, I'll return in 24 hours with a new fractal and a few more words. Until then, take care, and the best has not yet arrived. Jim Muth jamth@mindspring.com |
START 20.0 PAR-FORMULA FILE================================
Breaking-up_Midget { ; time=0:11:06.74 -- SF5 on a p200
; Version 2000 Patchlevel 9
reset=2000 type=formula formulafile=branchct.frm
formulaname=MandelbrotBC passes=1
center-mag=-0.09561066091537362/+0.78473810657722410\
/352024.7/1/35 params=1.414213562373/0/0/0 float=y
maxiter=60000 inside=0 logmap=136 periodicity=10
colors=000WYl<3>RSoQRpPQp<21>DehCfhCgh<3>Aig<15>VEUW\
CUXAT<3>a3Q<11>iBCiBAjC9<2>lE6lE5kG4<22>jk1jl1jn1jo1\
jp1jr1jr1mm0<3>dU3aP4_K5YK5WK6TKCRKGPKKNKOLMS<2>SScU\
UfZVj<3>rTzwTzzSzwSztUoqVknXhkYdhYceZabZ`<3>URXSQWRO\
VTMU<2>ZLR<2>dWOfaNhcMjeLlgKniLomM<2>smOwmPzhPzfQzcR\
zaRx_SvYTwXU<3>vTYuSZuR_tS`tTatUb<23>XkYWlYVmX<3>RpX\
Nq_<3>ZuRavPdwNfxKiyI<3>uzAwz8vzA<6>rzIrzJqzK<3>ozOn\
zOozP<17>xzZ
}
frm:MandelbrotBC = { ; Z=Z^E+C Andrew Coppin
e=p1
p=real(p2)+PI
q=2*PI*trunc(p/(2*PI))
r=real(p2)-q
Z=C=Pixel:
Z=log(Z)
IF(imag(Z)>r)
Z=Z+flip(2*PI)
ENDIF
Z=exp(e*(Z+flip(q)))+C
|Z| < 100
}
END 20.0 PAR-FORMULA FILE==================================
|
times.
