Hi, the image came about in the initial stages of my multifractal project. I erased the formula when I saw it was buggy, the image was not finalized. When I looked at it, it was too late. It contained artefacts, small fractals ready to zoom into within the circular "windows", which are created by Linda Allisonïs many-mods formula. They are not possible to reproduce, so they must be artefacts. Lately, when I cleaned up the work folder I saw that the dos-commander had created a backup file. So voila, here it is. Sincerely, Al. ----------------------------------start-par-------------------------------- Artefacts { ; crated by a buggy formula ; reset=2004 type=formula formulafile=mfr.par formulaname=mfrspecial_2 ismand=y function=exp/exp/exp passes=t center-mag=0/0/0.6666667 params=0.4546494949186682/-0.6008903775139622/384.0001/256.512/2084.0008\ /768.256/768.1536/2560.1025/-4/2 float=y maxiter=2048 inside=maxiter outside=tdis logmap=3 periodicity=0 rseed=-2436 colors=200444222000<25>0bo0cq0es<3>0kz<25>09C08A068<2>022000211<22>keOmg\ PoiQqjRslSunT<2>zsX<25>CB7A96875<3>000400<23>o00q00s00<3>z00<25>C00A0080\ 0<3>000<23>eeegggiiijjjlllnnn<2>sss<18>NNNLLLJJJ<4>CCCAAA888666 } ---------------------------------start-frm--------------------------------- FRM:MFRSPECIAL_2 {; buggy - dont copy ; d=real(p2) fac1=trunc(d) b1=(d-fac1)*10000 ; d=imag(p2) mi1=trunc(d) p6r=(d-out1)*10000 if (mi1<0) mi1=-mi1 endif ; d=real(p3) ba=trunc(d) p6i=(d-ba)*10000 if (ba<0) ba=-ba endif p6=p6r,p6i ; d=imag(p3) fac2=trunc(d) b2=(d-fac2)*10000 ; d=real(p4) mi2=trunc(d) fac3=(d-mi2)*10000 ; d=imag(p4) b3=trunc(d) mi3=(d-b3)*10000 ; d1=real(p5) vb=(d1<0) If (vb) d1=-d1 endif ir1=(d1>1000) d1=d1-1000*ir1 wo=(d1>100) d1=d1-100*wo tj=(d1<10) d1=d1-10*(tj==0) v1=(d1==3) v2=(d1==4) d1=(d1==2)+(d1==4) ; d2=imag(p5) st=(d2<0) if (st) d2=-d2 endif ir2=(d2>1000) d2=d2-1000*ir2 ni=2*(d2>100) st=st*(ni==0) d2=d2-50*ni mj=(d2<10) d2=d2-10*(mj==0) v3=(d2==3) v4=(d2==4) d2=(d2==2)+(d2==4) d3=(ismand==0) t=0 u=1 bx=ba start=2-st-ni if (ismand) z=0 if (vb) c=0.4*log(sqr(pixel^p6i)) else c=pixel endif else c=p1 z=pixel endif : ba=bx if (vb) if (d3) z=(z*z-real(c))^(z*u+imag(c)) else z2=sin(z)+c sqz2=cos(z2) z=c*(1-sqz2)/(1+sqz2) ba=p6 endif else ; q=sqr(z) ; z=real(q)+flip(real(z*q))+c z=z*z+c endif bo=|z| If (wo) t=t+1 if ((t<mi1)+(bo>b1)) u=2*(fn1(t/fac1)) if (ismand) z=z*u c=pixel if (vb) c=0.4*log(sqr(pixel^p6i)) endif else z=pixel c=p1*u endif wo=0 if (ir1) t=0 endif endif else if (start) t=t+1 if (start==2) if ((t>mi2)+(bo>b2)) u=2*(fn2(t/fac2)) if (d1) if (tj) z=pixel endif c=p1*u vb=v2 d3=vb else d3=0 z=z*u c=z if (mj) z=0 endif vb=v1 if (vb) c=0.4*log(sqr(pixel^p6i)) ; p6r=mi2 ; p6=mi2,p6i endif endif start=1 if (ir2) t=0 endif endif else if ((t>mi3)+(bo>b3)) u=2*(fn3(t/fac3)) if (d2) if (tj) z=pixel endif c=p1*u vb=v4 d3=vb else d3=0 z=z*u c=z if (mj) z=0 endif vb=v3 if (vb) c=0.4*log(sqr(pixel^p6i)) ; p6r=mi3 ; p6=mi3,p6i endif endif start=0 endif endif endif endif bo<=ba } -----------------------------------------end--------------------------------