Fractal of the Day
by Jim Muth
START PARAMETER FILE=======================================
Inside_the_Nucleus { ; time=0:00:16.66-SF5 on P4-2000
reset=2004 type=formula formulafile=allinone.frm
formulaname=JuliaBC2 maxiter=1000 periodicity=10
center-mag=-0.00327762/0.00070084/9.34161 logmap=6
params=1.3/0/3/0/-0.74930081/0.3777896/0/0 float=y
inside=bof61
colors=00000N00s00s00O00K00K00L00N00S00T00V00P00V0\
0b01e04Y16U47h78v9B_CCUFEjIHjKIbMKjQMjTOlRQiUSlbVl\
eWmcYmlamobmscovgoyoozjozlozmqzzzxmsvmstmssxtqotoo\
vmrzlzzhzzgzzezzczzzzzzzzzzzzzzzzzzzzzzzzzz1lz0hz0\
sz0ex0bt0`q0tz0Yj0Ve0Tb0gs0OW0MT0LQ0az0KM0KL1IL1Qe\
3HK3HI4FI04H3EH6EFcCF7CE7CC8BCcBB09B999B89c88078C7\
7E67E66C13E66F87HB9IEBKHELKFMMIOQKQTMSWOT_QzYOzWOz\
WMzVMzVMzTLzTLzSKzQKeQKgOIhOIjMHzMHzLHzKFzKFzIEzIE\
zHEzHCzFCzEBzEBzCBzCAzB9zB9y9Cx9Ev9Ft9Hs8Ko8Lm8Ml8\
Oj7Sh7Te7Vc7Wb7Y`6`_6bW6cV6eT4hS4jQ4lM4mL4oK3sI3tH\
3vE3xC1zB1z91z81z84z71z60z40t30m10g00`10b10c11e17g\
3Ch3Hj3Ml3Tm3Ym6Vo7To8SqBQqCOsEMsHLtIKtKItMHvOFvQE\
xTCxVByW9yY8y`6zb4zc3zg1zh0zj0zm0zo0zq0zt0zv0zx0zz\
0zz0zz0zz0zz0zz0zy0vx0sv0ms1hTOQSKOSHMQELOBIO8HM4F\
L1EL0CK0BK09I0BH0CF0CE0EC0FB0F90H80I70I60K40L30L10\
M00O00O00Q00S00S0PY0cc0vY }
frm:JuliaBC2 { ; Formula by Andrew Coppin
e=p1, p=real(p2)+PI, q=2*PI*floor(p/(2*PI)),
r=real(p2)-q, C=p3, Z=Pixel:
Z=log(Z)
IF(imag(Z) > r)
Z=Z+flip(2*PI)
ENDIF
Z=exp(e*(Z+flip(q)))+C
|Z| < p4+100 }
END PARAMETER FILE=========================================
times.