|
Fractal of the Day
by Jim Muth
|
|
FOTD -- January 06, 2009 (Rating 8.5) Fractal visionaries and enthusiasts: With an unexpected load of work to finish, I have little time to write a discussion. The image lies on the main spike of a perturbed Mandeloid. In my opinion, it is worth a rating of 8-1/2. The half point is a reward for the bit of extra effort I put into the coloring. The name "Real Gone Minibrot" refers to a minibrot that once was there but now is gone. The calculation time of 2-1/4 minutes brings relief to the time challenged. A trip to the FOTD web site at:to view the already-calculated image brings relief to all. A mixture of sun and clouds here at Fractal Central on Monday kept the fractal cats confused; the temperature of 43F 6C kept the heating bill down. My day was very busy; tomorrow will be the same. The next FOTD has a 75-percent chance of being posted in 24 hours. Until then, take care, and the real truth will confuse skeptics and believers alike. Jim Muth jamth@mindspring.com jimmuth@aol.com |
START PARAMETER FILE=======================================
Real_Gone_Minibrot { ; time=0:02:15.21-SF5 on P4-2000
reset=2004 type=formula formulafile=allinone.frm
formulaname=DivideJulibrot inside=255 periodicity=10
center-mag=-3.711918934869418/0/2.319291e+011/1.082\
9/90/0 logmap=408 mathtolerance=0.05/1 maxiter=1200
params=0/0/0/0/0/0/-0.81/0/5/2 float=y
colors=000AAKAAKAAOAASAAWAA_AAbAAfAAjAAnA9qABrACsB\
DtBEuBFvAGwAHxAIyCJzEJzGJzIJzKJzMJzOJzQJzZV6VQ9RMC\
NHFJDHNCGQBGUAFX9F`8Ec7Ef6Dj5Dm4Cq3Ct2Bw1BYC68M2BO\
6DPAGREISIKULNVPPXTSYXU_`W`cZbg`ckceoefsggvedrdanb\
_jaXg_VcZS_XPXWNTUKPTIMKJdBKwDOvFSuGVuIZtzzzzzzzzz\
zzzzzzzzzzzlzzXzvYzrZznWziVzfQzdOvbNr_MmXLjTKeQJ`N\
IWJHRGGLDFF9EA6D63C000U10dA0mK0sU0u`0wh0zo1zv9dXHV\
dPLlXPiZTg_Xe``bad`bgZckXdoUesSfwQgzOhAo`BpbCpdDpe\
EqgFqiGqjHrlLrnProUsqZsscsthtvmsshtmcuhZvcUwZZvUiu\
blukprtlqrgopcmn_klWijTghPefLcdHabD_`9YZ6WYBUVGSTL\
QQQNOVLLZJJZGGYDDYBBUEERHKONUKUcU`mZfrcmvhtzmzzkzz\
izzfzvczr`zmZyhXxfVwgUuhPsiKqj9ohCmfFkdJibMf`PcZT`\
XWYWZVUbSSePQhMOlJMoGKrDJsAIsBHsDHsFGsHGsJFsMFsOEs\
QEsSDsUDsWCsYChhRZseXrdWrcUqcTqbRpbQpaOoaNo`Mn_Kn_\
JmZHmZGlYElYDkXCkXJbTPUQVLNWMLWNKXOJXPIYQGYRFZSEZT\
D_UB_VA`W9`X8aY6aZ5b_4b_3 }
frm:DivideJulibrot {; draws 4-D slices of DivideBrot Julibrots
pix=pixel, u=real(pix), v=imag(pix),
a=pi*real(p1*0.0055555555555556),
b=pi*imag(p1*0.0055555555555556),
g=pi*real(p2*0.0055555555555556),
d=pi*imag(p2*0.0055555555555556),
ca=cos(a), cb=cos(b), sb=sin(b), cg=cos(g),
sg=sin(g), cd=cos(d), sd=sin(d),
aa=-(real(p5)-2), bb=(imag(p5)+0.00000000000000000000001),
p=u*cg*cd-v*(ca*sb*sg*cd+ca*cb*sd),
q=u*cg*sd+v*(ca*cb*cd-ca*sb*sg*sd),
r=u*sg+v*ca*sb*cg, s=v*sin(a),
c=p+flip(q)+p3, z=r+flip(s)+p4:
z=sqr(z)/(z^(aa)+bb)+c
|z| < 1000000 }
END PARAMETER FILE=========================================
|
times.
