|
Fractal of the Day
by Jim Muth
|
|
Fractal visionaries and enthusiasts: Today's FOTD is late due to a work rush. The feathery scene is an almost-Julia set of the East Valley area of the (-Z)^(2.01)+C Mandeloid. I call the image an almost-Julia set because it is oriented within 0.005 degree of being a true Julia set. I named it "Straight and Narrow" after the blue stripes running diagonally through it. The rating of a 5 seems fair enough. The image is better viewed than described. One way of viewing the scene is to start the included parameter file and wait a while. A better way is to view it in finished form on the FOTD web site at: But due to the unusual hour of the posting, it might be a while before the image is posted there. Cloudy, blustery and unusually chilly weather prevailed here at Fractal Central on Wednesday. The high temperature of 68F 20C was well below normal. The fractal cats adjusted by shifting from stretched-out mode to curled-up mode. In my department, the day was very busy. And it now looks like tomorrow may be the same. Despite all this, the next FOTD will likely be posted in 24 hours. Until then, take care, and ain't fractals fun? Jim Muth jamth@mindspring.com jimmuth@aol.com |
START PARAMETER FILE=======================================
StraightAndNarrow { ; time=0:27:09.25-SF5 on P4-2000
reset=2004 type=formula formulafile=allinone.frm
formulaname=SliceJulibrot5 logmap=yes maxiter=32767
center-mag=-0.000471978/0/1.138295/1/-90/0 inside=0
params=89.995/90/89.995/90/0.25567/0.00843/0/0/2.0\
1/0 float=y passes=1 periodicity=10
colors=000KKCLLDMMENNFOOGPPHQQIRRJSSKTTLUUMVVNWWOX\
XPYYQZXHWWMUWQRVUPVYNUaKUeITiFTmDSq9OxBSuCVsDZqFao\
GdmHhkIkiKngLreMucNxaPvZRtWTsTVqRXpOZnL_mJakGciDeg\
Agd8ia5kY2lV0kZ7jbDjgKieQhjXhkbgmifnohryfoudmrckna\
ik_ggZedXb`V`YUZUSXRQVNQQLPTKOVKNXJMZJM`ILbIKdHJgH\
IiGIkGHmFGoFFqEw`5FsEItDLtDNtCQtCTtBVtBYuA_uAbu9eu\
9gu8ju8nz5lu8kqBimEhiHfeKeaNdYQbTTaPW_LZZHaXDdW9gS\
0lV5jXAiZEhaJfcNeeSdgWccR__NWWITSEPO9MK5IF0DH1FJ2H\
L3JN4LP5MR6OT7QV7SX8UZ9V`AXbBZdC`fDbhDcjAnk8xhArfC\
lcEgaGaZIWXKRUMLSNGPRBTPFWOJZNNbMQeLUhKYlJ`oIdrHhu\
9wuGkuN_uUOtb4u`CvZKwXSxV_yTgzRozPwyOvyNuyMtxLtxKs\
xJswItwHuwGvvFwvExvDyuCzuBzuAzu9zb_zK`zLazMbzMczNc\
zOczOczPZzQZzNZzQZzSZzUZzWZzYZz_ZzaZz_ZzYZzWZzVZzT\
ZzRZzPZzOZzMZzKZzKZzJZzIZzHZzGhzFhzEhzDhzBhzDhzEhz\
FhzGhzHhzIhzJhzLhzMhzNhzOhzPhzQhzThzRhzQhzPhzOhzNh\
zMhzLhzKhzJhzHhzIhzJhzKhz }
frm:SliceJulibrot5 {; draws slices of (-Z)^n 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.
