Busy busy today but not so busy I don't have time to post this par "Celery of the Gods".
If you're busy as I am go to http://maxitersfractalfollies.blogspot.com and save some
precious calculating moments by viewing the finished fractal.

fract265.gif       { ; fractal chlorophyll
                     ; blank
                     ; calctime   0:04:40.40
                     ; created Jun 20, 2010
                     ;  Fractint Version 2004 Patchlevel 9
  reset=2000 type=formula formulafile=_t.frm formulaname=tri-julia-2
  center-mag=-0.338785/-0.449154/4.341378/1/47.5000000000000711/5.12714870\
  559705105e-014
  params=1025.653340250862/1.891872920926542/-0.4537186803796504/0.4264961\
  699270607 float=y maxiter=1200 outside=atan periodicity=0
  cyclerange=0/255
  colors=0000200000000000200300500600800A00B00D00E00G00I00J00L00M00O00Q00R\
  00T00U00W00Y00Z00`00a00c00e00f00h00i00k00m01m03m04n06n07o09o0Ao0Cp0Ep0Fq\
  0Hq0Iq0Kr0Lr0Ns0Ps0Qs0St0Tt0Vu0Wu0Yu0Zv0`v0bw0cw0ew0fx0hx0iy0ky0mz0mz1mz\
  3mz3lz3kz3jy3iy3hy3gy2fx2ex2dx2cx2bw2aw1`w1_w1Zv1Yv1Xv1Wu0Wu0Xu0Yu0Zu1_u\
  1`u1av2bv2cv2dv3ev3fv3gw4hw4iw4jw5jw5kw5lw5mx6nx6ox6px7qx7rx7sy8sy8ry8qy\
  7py7py7oy6ny6my6my5ly5ky4jy4iy4iy3hy3gy3fy2fy2ey2dy1cy1bz0cz0dz0ez0fz0gz\
  0hz0iz0jz0kz0lz0mz0nz0oz0pz0qz0rz0sz0qz0pz0oz0mz0lz0kz0iz0hz0gz0fz0dz0cz\
  0bz0`z0_z0Zz0Yz0Wz0Vz0Uz0Sz0Rz0Qz0Oz0Nz0Mz0Lz0Jz0Iz0Hz0Fz0Ez0Dz0Bz0Az09z\
  08z06z05z03z02z00z00y00x00w00v00u00t00s00r00q00p00o00n00m00l00k00j00i00h\
  00g00f00e00d00c00b00a00`00_00Z00Y00X00W00V00U00T00S00R00Q00P00O00N00M00L\
  00K00J00I00H00G00F00E00D00C00B00A0090080070060050040030
  }

frm:tri-julia-2 {; Sylvie Gallet <sylvie_gallet@compuserve.com>, May 1997
             ; Thanks to Kerry Mitchell for the idea!
             ; real(p1) = bailout (1024 recommended)
             ; imag(p1) must be different from 0 (>=1 recommended)
             ; p2 = parameter for the Julia set
   ; This formula must be used with decomp = 256 and periodicity = 0
   ;
  z1 = pixel, mz1 = cabs(z1), b = cabs(p2), summ = iter = 0
  b1 = abs(real(p1)), f = b1^0.1
  b2 = b1*f, b3 = b2*f, b4 = b3*f, b5 = b4*f, b6 = b5*f
  b7 = b6*f, b8 = b7*f, b9 = b8*f, b10 = b9*f, b11 = b10*f
  iter1 = iter2 = iter3 = iter4 = iter5 = iter6 = iter7 \
        = iter8 = iter9 = iter10 = summ_tot = iter_tot = 0
  k = imag(p1) * (0.0,6.28319530718)
  :
  iter = iter + 1, a = mz1 * mz1
  z1 = z1 * z1 + p2, mz1 = cabs(z1), a_b = abs(a - b)
  summ = summ + (mz1 - a_b) / (a+b - a_b)
  IF (mz1 > b1)
    IF (iter1==0)
      iter1 = iter
      iter_tot = iter_tot + iter1
      summ_tot = summ_tot + summ
    ENDIF
    IF (mz1 > b2)
      IF (iter2==0)
        iter2 = iter
        iter_tot = iter_tot + iter2
        summ_tot = summ_tot + summ
      ENDIF
      IF (mz1 > b3)
        IF (iter3==0)
          iter3 = iter
          iter_tot = iter_tot + iter3
          summ_tot = summ_tot + summ
        ENDIF
        IF (mz1 > b4)
          IF (iter4==0)
            iter4 = iter
            iter_tot = iter_tot + iter4
            summ_tot = summ_tot + summ
          ENDIF
          IF (mz1 > b5)
            IF (iter5==0)
              iter5 = iter
              iter_tot = iter_tot + iter5
              summ_tot = summ_tot + summ
            ENDIF
            IF (mz1 > b6)
              IF (iter6==0)
                iter6 = iter
                iter_tot = iter_tot + iter6
                summ_tot = summ_tot + summ
              ENDIF
              IF (mz1 > b7)
                IF (iter7==0)
                  iter7 = iter
                  iter_tot = iter_tot + iter7
                  summ_tot = summ_tot + summ
                ENDIF
                IF (mz1 > b8)
                  IF (iter8==0)
                    iter8 = iter
                    iter_tot = iter_tot + iter8
                    summ_tot = summ_tot + summ
                  ENDIF
                  IF (mz1 > b9)
                    IF (iter9==0)
                      iter9 = iter
                      iter_tot = iter_tot + iter9
                      summ_tot = summ_tot + summ
                    ENDIF
                    IF (mz1 > b10)
                      IF (iter10==0)
                        iter10 = iter
                        iter_tot = iter_tot + iter10
                        summ_tot = summ_tot + summ
                      ENDIF
                      IF (mz1 > b11)
                        iter_tot = iter_tot + iter
                        summ_tot = summ_tot + summ
                        z = exp (summ_tot * k / iter_tot)
                      ENDIF
                    ENDIF
                  ENDIF
                ENDIF
              ENDIF
            ENDIF
          ENDIF
        ENDIF
      ENDIF
    ENDIF
  ENDIF
  mz1 <= b11
  ;SOURCE: triangl.frm
}
Roger Alexander

---

Turn down-time into play-time with Messenger games Play Now!