Fractal of the Day
by Jim Muth
START PARAMETER FILE=======================================
Seahorse_Valley-28 { ; time=0:03:31.54-SF5 on P4-2000
reset=2004 type=formula formulafile=basic.frm
formulaname=SliceJulibrot4 passes=1 periodicity=10
params=2.8/-7.3/90.3/-4.4/-0.76/0/-0.5/0/2/0 float=y
center-mag=0.460478/0.175657/3.554948/0.2653/179.409\
174596140105/-9.88243261062668 maxiter=5200 inside=0
colors=000UBFTCFSDEREDQFDPGCOHBNIBMJALK9KL6JM9INCH\
OFGPIGQLJROMSQPUSSWUVZWYaY`d_cgafjdijglkjolmrlpums\
wlwwmzsnzoovmprjpmgqhercbsZ_sUXtPUuKRvFPvAQs6Rq6Ro\
5Sm5Tk5Ti4Uf4Vd4Vb3W`3XZ3XX2YV2ZS2ZQ1_O1`M1`K0aI0a\
G0`I3_J5_K7ZLAYNCYOEXPHWQJWSLVTNUUQUVSTXUSYXSZZR_a\
QacQbePcgPdiTfkWgm_iobjqfksimumnwpoxmkykhzhdzfazd`\
zc`zb`za`z``z_`zZ`zY_zX_zW_zV_zT_zS_zR_zQZzPZzOZzN\
ZzMZzLZzKZzJZzI`zHazGbzFczFdzEezDgzChzCizBjzAkz9lz\
8oz9mzAlzBkzCizDhzEgzFezGdzHczIazJ`zK_zLYzMXzNWzOU\
zPTzQSzRQzSPzTOzSOzSOzSOzSOzSOzSOzSOzSOzSOzSOzMKzS\
OzYSzcWze_zhZzkYznXzpWzh`zaezUjzNozFtz8yz8yz7sz7mz\
6gz6bz7dz7ez7fz7gz8hz8iz8kz8lz9mz9nz9oz9pzCkzEgzGc\
zJZzLVzNRzPNzu5zi6zY7zN8zB9z0AzDOzQ`zbmznzzovzorzo\
nzojzpfzpbzpZzpWzl_zhczdfz`jzXnzTqzPuzMxzKwzJvzHvz\
GuzFuzDtzCtzAsz9sz8rz6rz5qz3qz2pz1pzJqz_qzpqzoqzoq\
zoqzoqzoqzRQzPOzcBz`BzYBz }
frm:SliceJulibrot4 {; 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.