Fractal of the Day
by Jim Muth
START PARAMETER FILE=======================================
TheElephantsGoWest { ; time=0:06:06.66-SF5 on P4-2000
reset=2004 type=formula formulafile=basic.frm
formulaname=MandelbrotBC3 function=floor logmap=286
center-mag=-0.254082178434463/-0.0011403938506048/\
7.2428e+007/1/-105/0 inside=0 passes=1 maxiter=4000
params=2.003/0/1050/0 float=y periodicity=10
colors=000UccUcbUcaUc`Uc_UcZUcYUcXUcWWcV_cUbbSfaQi\
`Om_NpYLtWJwUItQHrNGoKFmHEkEDhDGfCIcCKaBN_BOXAPVAQ\
T9SQ8TO8VM7YJ7_H6`F6aJBaNFcQJeUNgXSh`Wic_kgcmjgnjh\
kjhhjhdnh`rhXvhTzhPzhLzhHzhEzjGznHzrJzvKzzMzzNzzPz\
zQzzRzzTzzUzzWzzXzzZzz_zz`zzazzbzzczzdzzezzfzzgzeh\
zcizajzZkzXlzVlz`ezf_zStzVszXrvZqr`pmbohdncfmZhlQj\
kOljLniJphHrgFtfDveEw`FwWGxSGxNHyJIyEIyAMxDPwGTwJW\
vM_uPbuSftVitYms`prctrfwqizqkthao_SjSJTOUBLdAQfAUh\
AYiAakAelAjnKnpUrqcvsmmtmgqzcozalz_jzYhYWeaUceSaHP\
hDKdAG`7CX48TH6`U5hPDeLLcHSaD_Z9fX5nV1uT5pU8kVBfWE\
aXIXYLSZON_RI`KLbDOd5Rc7Qe8Pg9OhANjBMlCLmDLoEKiFJc\
GIcHHcIGcJGcKFcKEcKDcKCcLCcLBcLAcL9qL8pM8pM7oM6nM5\
mM5mO8jPBhQEfSHdTKbUN`WQZXTWYWU_US`UQaUOcUMdUKhUMe\
UIcUFaUCWUFRUIMUKHUNCUQ7USBU_E`g5muHgnTbgcY`o`UzcO\
shPmmQgrRavSWzTQzUKzVEzW0z`8zXGzTNzQVzMazJ`zI_zHZz\
GYzF`z2XzETzQPzaJznuzWxzc }
frm:MandelbrotBC3 { ; by several FractInt users
e=p1, a=imag(p2)+100
p=real(p2)+PI
q=2*PI*fn1(p/(2*PI))
r=real(p2)+PI-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| < a }
END PARAMETER FILE=========================================
times.