|
Fractal of the Day
by Jim Muth
|
|
Fractal enthusiasts and visionaries: An unexpected busy day, (campaign material for the upcoming election), prevented me from writing much of a discussion. In fact, the rush almost prevented me from having a FOTD at all. Today's fractal is yesterday's reject -- another near Julia set of the (-Z)^1.5+C figure. The image vividly displays the discontinuous spirals that characterize this figure, with the grossly enlarged remains of a mis-shapen Mandel-valley cutting diagonally through the matrix. Unable to think of a better name, I decided on "Julia Matrix". It doesn't really describe the picture, but it's better than nothing. The scene is colored in an attempt to give the impression of silvery light shining from behind. The attempt is only moderately successful. The resulting rather slow image has been posted to: I hardly had a chance to notice the fractal weather today, but I know that it was bright and sunny, with a temperature around 62F (16.5C), which was perfect for whatever one wished it to be perfect for. I have thoughts on SETI and the big question that I left hanging, but with all the hassle, I had no chance to write the thoughts. I'll try again tomorrow, but that's not a promise. Until then, take care, and maybe it's time for me to think of slowing down. Jim Muth jamth@mindspring.com |
START FORMULA==============================================
multmin1-5-XY-ZW {; draws 6 planes and rotations
;when fn1-2=i,f, then p1 0,0=M, 0,90=O, 90,0=E, 90,90=J
;when fn1-2=f,i, then p1 0,0=M, 0,90=R, 90,0=P, 90,90=J
a=(real(p1)+10^(-100))*.01745329251994,
b=imag(p1)*.01745329251994,
z=sin(b)*fn1(real(pixel))+sin(a)*fn2(imag(pixel))+p2,
c=cos(b)*real(pixel)+cos(a)*flip(imag(pixel))+p3:
z=(-z)^1.5+c,
|z| <= 36 }
END FORMULA================================================
START PARAMETER FILE=======================================
Julia_Matrix { ; time=0:04:55.34 on a p233, SF5
reset=2000 type=formula formulafile=multirot.frm
formulaname=multmin1-5-XY-ZW function=flip/ident
passes=1 center-mag=0.187793/0.194154/0.8503401/1/32.5
params=88.381/96.488/0/0/0.5144/0.5401 float=y
maxiter=6000 bailout=25 inside=0 logmap=yes
symmetry=none periodicity=10
colors=000J76<14>UbdVdgWfi<3>Ynr<3>mvYpxTkpY<3>ULmP\
DqL5u<3>WXaZcX`jScqNexJ<3>gZ9hS7hM5hG3<6>jBGjAIj9K<\
3>j7R<9>QMHOOGMPF<3>EVC<3>VvM<12>cplcpndop<2>fnvfnx\
goy<16>npynpyopy<3>ppz<2>`_E<4>NeTKfWHgZ<3>6kj<3>gv\
c<3>UreRqeXfb<3>p1T<5>n9cnBenCf<3>mHm<3>KQqDSqIQl<3\
>ZIWcGSgEOkCKqKIwSG<3>obOmeQkgSijUhlV<3>jTJjPGjKD<2\
>k54k12m9G<2>pUr<3>HU_<3>SUSUUQXVO<3>fZGi_Ek`C<2>Xc\
_5dqgehmfEngA<3>XkCTlDPmD<3>fqMksOouQtwSxzUJz`eya<5\
>dvOcuMcuKctH<2>csCcs7cs3
}
END PARAMETER FILE=========================================
START 19.6 PAR-FORMULA FILE================================
Julia_Matrix { ; time=0:04:55.34 on a p233, SF5
reset=2000 type=formula formulafile=multirot.frm
formulaname=multmin1-5-XY-ZW function=flip/ident
passes=1 center-mag=0.187793/0.194154/0.8503401/1/32.5
params=88.381/96.488/0/0/0.5144/0.5401 float=y
maxiter=6000 bailout=25 inside=0 logmap=yes
symmetry=none periodicity=10
colors=000J76<14>UbdVdgWfi<3>Ynr<3>mvYpxTkpY<3>ULmP\
DqL5u<3>WXaZcX`jScqNexJ<3>gZ9hS7hM5hG3<6>jBGjAIj9K<\
3>j7R<9>QMHOOGMPF<3>EVC<3>VvM<12>cplcpndop<2>fnvfnx\
goy<16>npynpyopy<3>ppz<2>`_E<4>NeTKfWHgZ<3>6kj<3>gv\
c<3>UreRqeXfb<3>p1T<5>n9cnBenCf<3>mHm<3>KQqDSqIQl<3\
>ZIWcGSgEOkCKqKIwSG<3>obOmeQkgSijUhlV<3>jTJjPGjKD<2\
>k54k12m9G<2>pUr<3>HU_<3>SUSUUQXVO<3>fZGi_Ek`C<2>Xc\
_5dqgehmfEngA<3>XkCTlDPmD<3>fqMksOouQtwSxzUJz`eya<5\
>dvOcuMcuKctH<2>csCcs7cs3
}
frm:multmin1-5-XY-ZW {; draws 6 planes and rotations
;when fn1-2=i,f, then p1 0,0=M, 0,90=O, 90,0=E, 90,90=J
;when fn1-2=f,i, then p1 0,0=M, 0,90=R, 90,0=P, 90,90=J
a=(real(p1)+10^(-100))*.01745329251994,
b=imag(p1)*.01745329251994,
z=sin(b)*fn1(real(pixel))+sin(a)*fn2(imag(pixel))+p2,
c=cos(b)*real(pixel)+cos(a)*flip(imag(pixel))+p3:
z=(-z)^1.5+c,
|z| <= 36 }
END 19.6 PAR-FORMULA FILE==================================
|
times.
