Fractal of the Day
by Jim Muth
START PARAMETER FILE=======================================
Seahorse_Valley-09 { ; time=0:05:12.20-SF5 on P4-2000
reset=2004 type=formula formulafile=basic.frm
formulaname=SliceJulibrot4 float=y passes=t inside=0
params=42.6/90/0/90/-0.7499841692570846/0.014446532\
0644315/0/0/2/0 symmetry=xaxis mathtolerance=0.05/1
center-mag=0/0/108000/50000000/0 periodicity=10
logmap=2000 maxiter=16000
colors=000zzzQYxTWwWUvZSuaQudOtgMsjKrmIqmGqkHmiHjg\
HgeIccI`cIYcJUcJRdJOeJLfLKgNJhPIiQHjSGkUFmVEnXDoZC\
p_BqaArc9sd9tc8ub7va6w`5x_4yZ3zY3vY8sYDoYIlYNhYSeY\
XaYaZYfVYkSYpOYuLYzOXxQXvSWuVWsXVrZVpaUocUmeUlT`bG\
gT4mJ8rLBvMEzNHzPKzQNvRQrTUmUXjV_iXbiYeiZhh`khanhb\
dg`VgZLgXBgVwpGumFsjEqhEoeDmbCk`CiYBgWBeTAcQ9aO9_L\
8ZJ8ZO7ZT7ZX7Za7Zf7Zj7YiCXhGWgLWfPVeUUdYUdaYbbaabe\
`ch_ceYZcWU`UQZTLWRGUPCRN7PM3CEM07d66aC6ZH6XN5US5R\
Y5Pb4Mh4Jm4Hi5Ee6Ba69Y76U83Q81P95OA9NBDMCHLDKKEOKF\
SJGWIH_HIbGJfFKjELnEMqGQmHUiIXfJ`bKdZLgWMkSNoOmr0P\
vzQyzRuzRrzRozRkzShzSeLSaMSZNTWOTSPTPQTMRTJSRHQPGP\
NFNLDMJCKHBJF9HD8GB7E96DDBCGFBKJANO9QS8UW7X`6`d5ch\
4fl3gg5hb6iY7jT8kP9lKAmFBnACo5Dz00z00z00z00z50zA0z\
F0zK0zP0zS0zV0zY0z`0zc0zf0zg0zi0zk0zm0zo0zq0zs0zu0\
zv0zw0zx0zy0zz0zz0zz0zz0zz0zzzzzzzzzzzzzzzzzzzzzzz\
zzzzzzzzzzzzzzzzzzzzzzzzz }
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.