Fractal of the Day
by Jim Muth
START PARAMETER FILE=======================================
Seahorse_Valley-19 { ; time=0:02:27.18-SF5 on P4-2000
reset=2004 type=formula formulafile=basic.frm
formulaname=SliceJulibrotMin4 inside=0 maxiter=50000
params=84/0/90/0/-0.760036373/0/0/0/2.5/0 logmap=yes
center-mag=-0.056338/0/1.03 float=y periodicity=10
colors=000hKdhLehMfhNghOihQjhRkhTmhVnhWphYqh_rh_th\
auhavhcwhcwhcwhdwhdwhewhewhfwhfwhfwhfwhfwT22V68X9D\
ZDI_GNaKScNXdQacP`bP_bO_aOZaOY`NY`NX_NWZMWZMVYMVYL\
UXLTXLTWKSWKRVJRUJQUJQTIPTIOSIOSHNRHMRHMQGLPGLPGKO\
FJOFJNEINEHMEHLDGLDGKDFKCEJCEJCDIBCIBCHBBGABGAAF99\
F99E98E87D87D86C76B75B74A64A63962952851640851951B6\
2C62E72F73H83I83K84L94N94OA5QA5RB5TB6UB6WC6XC7ZD7_\
E8aF8bG8dH9eI9gJ9hKAjLAkMAmNBnOBpQBqSCsUCt`CvcDwcD\
xhDqmCmmBmmBmmAmlAmk9mj1mi5mh9mgDmfGmeKmaOv_SwYRwW\
RwUQwSQzQPzPPzOPzOOzOOzPNzPNzPMzPMvQMwQLuQLsRKqRKo\
RKmSJkSJiSIhSIhTHgTHfTHfUGeUGeUFdVFcVFcVEbVEbWDaWD\
aWC`XC_XC_XBZYBZYAYYAYYAX_9W`9Va9Uc8Td8Se8Rf8Qh7Pi\
7Oj7Nk7Mm6Ln6Ko6Mp6Oq7Qr7Ss8Ut8Wu8Yv9_w9axAcyAezAg\
zBizBkzBmzCozCqzDszDuzDwzEyzEzzEzzFzzFzzGzzGzzHzzH\
zzLzzPzzUzzZzzczzhzzmzzrzzvzzzzzzzzzzzzzzzzzzzzzzz\
zzzzzzzzzzzzzzzzzzzzzzzzz }
frm:SliceJulibrotMin4 {; draws most slices of Julibrot
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),
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=(-z)^(p5)+c
|z| <= 9 }
END PARAMETER FILE=========================================
times.