;     Date: Sat, 21 Dec 2002 10:07:25 -0500
;     From: Jim Muth <jamth@mindspring.com>
;  Subject: [Fractint] FOTD 21-12-02 (Art-Nouveau Midget [6])
;       Id: <1.5.4.16.20021221100951.29bf489e@pop.mindspring.com>
; ---------
; FOTD -- December 21, 2002 (Rating 6)
; 
; Fractal visionaries and enthusiasts:
; 
; December is supposed to be a month without quadratic midgets.  
; This does not mean it is a month without near-quadratic midgets 
; however.  The midget at the center of today's image has in 
; itself small imperfections that indicate it was generated by the 
; formula Z^2.003+C rather than Z^2+C, so the quadratic-midget-
; free month continues.
; 
; If yesterday's image had a bit of an art-nouveau feel about it, 
; today's image looks like it came right out of 1898.  What could 
; I name it other than "Art-Nouveau Midget"?
; 
; The image was generated by the MandelbrotBC1 formula, which 
; calculated the parent fractal as it appears 1050 levels up the 
; logarithmic spiral, where it is rotated 180 degrees, causing the 
; negative X-axis split to fall on East Valley, which is now on 
; the west side of the origin.  I needed to go up 1050 levels 
; because with the exponent so close to 2, the fractal changes 
; very slowly as we depart from ground level.
; 
; Today's arty scene is located in an area of fractured chaos at 
; the edge of its parent's rotated East (or West) Valley, which is 
; just starting to broaden and split.  This area holds a horde of 
; other midgets, many of which might be far better than today's.  
; But it would take forever to track down all of them, and I have 
; little time to spare.
; 
; The image rates a 6, which is a little above average.  It 
; renders in 11 minutes, which is a little below average.  And it 
; downloads from the FOTD web sites in around one minute, which 
; is always average.  Those web sites may be accessed at:
; 
;           <http://home.att.net/~Paul.N.Lee/FotD/FotD.html>
; 
; and at:
; 
;           <http://sdboyd.dyndns.org/~sdboyd/fotd/index.html>
; 
; Friday began mild and showery here at Fractal Central, but 
; around midday the rain stopped, the breeze picked up and the sun 
; appeared.  The unusually warm temperature of 57F 14C lured the 
; cats into the yard even before the grass, or what is left of it, 
; had completely dried.  By the end of the day their moods were 
; actually pleasant enough to bring purrs.
; 
; For me, the heavy work continues uninterrupted.  And I also have 
; a number of gifts yet to find.  It's looking like I may have to 
; miss a few days' FOTD's next week, but at least tomorrow's will 
; appear on schedule.  Until then, take care, and a fractal a day 
; is one of the best ways to keep off that extra weight.
; 
; 
; Jim Muth
; jamth@mindspring.com
; jimmuth@aol.com
; 
; 
; START PARAMETER FILE================================

Art-Nouveau_Midget { ; time=0:11:09.54--SF5 on a p200
  reset=2002 type=formula formulafile=allinone.frm
  formulaname=MandelbrotBC1 function=floor passes=1
  center-mag=-0.25343966708155350/-0.000713379914758\
  68/5.764397e+007/1/-120/-1.23560159825952809e-007
  params=2.003/0/1050/0 float=y maxiter=2400 inside=0
  logmap=350 symmetry=none periodicity=10
  colors=00054G00B05G09K0EN0IQ0NT0QY0V`0Yd0bg0ej0Wd7\
  P_GGTP7PBKY0Vg0en4bmL_m_WknTkzQjzNjz`vqmzexzkG0dI2\
  YK4SL5LN5EP77Q90SB0TB0LP0D_04j00t20z00z00z00z00z00\
  z00z00x02x04x05w07w09v0Bv0Dt0Et0Et0Gn2Gj7GeDG_IGVN\
  IQSILWIE`I9eI4hI0dK5_LDVNKQPQLPWGQbBSh5Tn0Vt0Vx0Sr\
  0Qn2Nj4Ld5K_7GV9EPBBKD9EE77G42I20I00P00T00Y05b09g0\
  Dk4Gn7IrDKvGNxKPzPQzSSzVVz_WzbYze_zj`zmbzqdztezwgz\
  zgzzhzzjzzkzzmzzmzzqzzvzvzznzzgzz_zz`zz`zz`wzbrzbm\
  zbhzddzd_zdTzePzeKzaEze9zb4zk0zn0zt0xx2vz5`zrTzrLz\
  rBzr2zr0zr0zr0zw7wzKtzTqzbnzegxh_nkTdnLTqDIr55h7DW\
  9LLBS9DYBLdBShBYmDdqDjvDpzEvzEzzEzzBzz7lz4qr0km0ge\
  0`_0WT0T_2Qd7NhDamKGqPDvT9zY7zT5wQ4qL2kI2dD2Y92S42\
  K02D02542B92GG2KL2PS2SW0Wb0_g0dm0hq0kw0pz2rz2wz2zz\
  9vzEqvKmqPjmTegY`bbYYgTSkPNpKItGBxB5z50z20z40z50z5\
  0z70z70z90z90zB0zB0zD0zD0zE9zGKzISzK_zLhzNpzPwzQzz\
  SzzTzzTzzYzw`jzd`zYQzTGzN }

frm:MandelbrotBC1   { ; by several Fractint users
  e=p1, a=imag(p2)+100
  p=real(p2)+PI
  q=2*PI*fn1(p/(2*PI))
  r=real(p2)-q
  Z=C=Pixel:
    Z=log(Z)
    IF(imag(Z)>r)
      Z=Z+flip(2*PI)
    ENDIF
    Z=exp(e*(Z+flip(q)))+C
  |Z|<a }

; END PARAMETER FILE==================================
; 
;