Fractal of the Day
by Jim Muth
START PARAMETER FILE=======================================
Unity_and_a_Half-2 { ; time=0:00:44.80-SF5 on P4-2000
reset=2004 type=formula formulafile=basic.frm
formulaname=MandelbrotBC3 function=ident logmap=105
center-mag=+0.1641879378341295/+0.775442975243285/\
200823.9/1/-5/0 float=y maxiter=1800 periodicity=10
params=1.5/0/30/0 inside=0
colors=0000HU000K0U0000KU000N0U0000HU000K0Ul0fi1cf\
2`c3Y`4VY5SV6QS7NP8KM9HJAEWU2UR4SP5QN6OL7NJ8LH9JFA\
HDBzm8wi9te9qb9n_AkXAgUAcRB_NBWLBSICOGCKDCoMMfJJYG\
HPDEZOFYNEXMEWMEVLEVLEUKETKESJERJDRIDQRzPHzOGtNGmN\
KcMFcLEZKEUJDPJDKICFHCCGBCcuAaqB_mBYiBWeBUaBSYBQUC\
OQCMMCKICIECz5Az6Bz6Bz6Bv6Br7Bm7Bh7Bc7BZ8BU8BP8BK8\
BJ9CI9CI9CI9CIACHACHACHACGBCGBCGBCf5Ga6FY7ET8EP9DK\
ACH09G2AG3AG5BG6BG7BG9CGACPu`OrZOpYNnXNlWMiVMgTMeS\
LcRL`QKZPKXNJVMJSLJQKIOJIMHHJGHHFGFEGDDF5mG6lH7lJ9\
lKAkMBkNDkOEkQFjRHjTIjUJiVLiXMiYNh_Ph`QhaRhm`kxjnv\
hotgosfoqeopdoncombokaoj`oh_ogZoeYocXpbWp`Vp_UpYTp\
XSpVRpUQpSPpROpPNpOMpQOnRQlSSjTUhUWfVYdW_bXa`Zc__e\
Y`gWaiUbkScmQdoOeqMfrLeqKeqKepJdpJdpJdoIdoIcoIcnHc\
nHcmGbmGbmGblFblFalFakEakEakEdzMezOezPezQfzRfzSfzT\
gzUgzVgzXhzYhzZhz_iz`izaizbizc`zYSzSJzM0z7LzuJzeHz\
RZzEXzDWzDVzDTzDSzDRzDQzD }
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.