Fractal visionaries and enthusiasts:

Being far behind in nearly everything, I cheated a little today and found a quickie fractal in the Mandelbrot image that was posted to the list on Sep 11 by Roger Alexander, using a formula that was created by Paul Carlson in 1998.

Since the Sep 11 image is basically a tricked-out Mandelbrot set, I found today's scene by checking Seahorse Valley of the classic M-set for a minibrot and transferring the coordinates to the Sep 11 image.  Some parameter tweaking was necessary, but in the end I turned up a fractal (if that's what it is) that I felt worthy of granting FOTD status to.

Since the image is not of my own origin, (I used the Sep 11 color palette as well), I could not rate it.  The name "Carlson Minibrot" gives recognition to the writer of the formula.

Ample sun and a temperature of 81F 27C made for an acceptable mid-September day here at Fractal Central on Monday.  (I'm still a day behind on the FOTD's, so the weather is for the day of the FOTD.)  The fractal cats must have been totally satisfied.  They gave no comment, verbal or otherwise, about the weather.

My day was busy; FL's was even busier.  The next FOTD will be posted in 24 hours, maybe sooner if I find a chance to start getting caught up.  Until next time, take care, and take comfort in the illusory reality of the real world.

Jim Muth
jamth@mindspring.com
jimmuth@aol.com


START PARAMETER FILE=======================================

Carlson_Minibrot   { ; time=0:02:58.43-SF5 on P4-2000
  reset=2004 type=formula formulafile=basicer.frm
  formulaname=mandel_rings center-mag=-1.76859049464\
  5/+0.001606111983/8e+007/1/180 params=0.18/0/4/64
  float=y maxiter=3200 inside=0 outside=summ
  colors=zz0000zbezbeyadyady`cy`bx_bxZaxZaxY`wY_wX_w\
  XZwWZvWYvVXvUXvUWuTWuTVuSUuSUtRTtRTtQStPRsPRsOQsOQ\
  sNPrNOrMOrMNrLNqKMqKLqJLqJKpIKpIJpHIpHIoGHoFHoFGoE\
  FnEFnDEnDEnCDmCCmBCmABmABl9Al99l89l88k78k77k66k56j\
  55j45i33j33i33i22i22i11h00h00g00g00f00e00e00d00c00\
  c00b00b00a00`00`00_00Z00Z00Y00X00X00W00W00V00U00U0\
  0T00S00S00R00Q00Q00P00P00O00N00N00M00L00L00K00J00J\
  00I00I00H00G00G00F00E00E00D00C00C00B00A00A00mmzllz\
  kkyjjyiixhhxggxffweeweevddvccvbbuaau``t__tZZtYYsYY\
  sXXrWWrVVqUUqTTqSSpRRpQQoPPoPPoOOnNNnMMmLLmKKmJJlI\
  IlHHkHHkGGjFFjEEjDDiCCiBBhAAh99h99g88g77f66e55d44c\
  33b22a11a00`00_00Z00Y00X00W00U00S00R00`00_00_00Z00\
  Z00Z00Y00Y00X00X00W00W00W00V00V00U00U00U00T00T00S0\
  0S00R00R00R00Q00Q00P00P00O00O00O00N00N00M00M00L00L\
  00L00K00K00J00J00J00I00I00H00H00G00G00G00F00F00E00\
  E00D00D00D00C00C00B00B00A }

frm:Mandel_Rings {; Copyright (c) Paul W. Carlson, 1998
  z = w = k = iter = range_num = bailout = 0
  c = pixel
  ring_width = real(p1)
  num_ranges = real(p2)
  colors_in_range = imag(p2)
  index_factor = (colors_in_range - 1) / ring_width
  :
  w = w * w + c
    ;
  dist = abs(|w|-.25)
  IF (dist < ring_width && iter > 0)
    bailout = 1
    z = index_factor * dist + range_num * colors_in_range + 1
  ENDIF
  range_num = range_num + 1
  IF (range_num == num_ranges)
    range_num = 0
  ENDIF
  iter = iter + 1
  z = z - iter
  bailout == 0 && |w| < 1.0e20
  ;SOURCE: carlson2.frm
}

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