Multifractal 1600/1200 Bug
Hi, I spend a lot of time trying to find a workaround for that bug and that is no fun anymore. I was kinda shocked when I read yesterdays message by Jim White. Imagine, working for years with a formula that only generates artefacts produced by a fractint bug -if it is true. Also Jonathans remark that the formula possibly will be broken by just that forces me to stop working with multifractal, at least until that bug is tracked down, if ever. So I tried to reproduce the Janusbird3 image with the new formula Multifractal_1. It should be no problem, as the relevant code is identical and only the iteration counter is used for switching. The result is identical except that tesseral (passes=t) does not produce error pixels anymore. But--it was not possible with Lee`s image which is a zoom with identical settings. In the frame of the basic image there are mandeloids which definetly are artefacts produced by misreading of the input values. The artefacts cannot be reproduced by changing of the settings. For me it is now certain, that fractint under certain conditions misreads the inputs and causes the error pixels when there is a conflict between the original settings and the misreadings. Mfx_testz is Lee`s image without the artefacts. -------------------------------start-par----------------------------------- mfx_testz { ; reproduced with Multifractal_1 ; 1600x1200 Image Copyright 2003 ; by Lee H. Skinner ver=2002 reset=2002 type=formula formulafile=mult240.frm formulaname=multifractal_1 ismand=y function=exp/exp/exp/exp passes=t center-mag=-1.41631/0.116469/5.602624/1/-87.4999999999999716/-1.14117049\ 143658278e-013 params=-0.2724234748374889/0.09260841170049135/384.00001/2048.4505/768.0\ 256000000001/768.0256000000001/1025.0256/1536.0256/12284.71/11.16 float=y maxiter=2048 inside=maxiter outside=tdis logmap=4 symmetry=none periodicity=0 rseed=-2436 cyclerange=2/255 colors=000000hrI<3>UnXRm_NlcJkgFfpAaz<3>PJoSFlWAi_5fc0ce7_jFRoNIzb0<2>zz\ 1zzC<2>zzz<3>jqdfo_blU<3>Mb8<3>LQ8KM8KJ8<2>I88H44G00<3>TA5WD6ZF7aI8eLAhM\ BiODjQF<3>qeBriAtm9vq8xu7zz5zz4zz3<4>zj4zg4zc4<3>zS5zP5zL6zI6zE6wE6tD6<6\
vAIv9Kv9M<3>x7Sy7Uy6Wz6Yz5_<3>f5Ma5IW4E<2>_4H<3>P3DN2CK2A<3>805G0BO0G<3\ g0Ul0Xq0`v0d<2>y0fz0gy0h<3>u1mt1ns1or2q<2>v2u<3>c5eZ6`U6X<2>F9LAAG7FO4K\ W0Qc<3>5Xc6Zc7`c7aa7c_7eY<3>FcgHciJbl<3>S_v<3>civflvinvlqvotvsww<2>zzz<3\ rwzovzhsw<3>Gch8_d8Xa<3>8JP8FL8CI<4>XCAaB9fB7<3>zA0<13>SA1QA1NA1<3>D92<\ 4>QR8SU9UXAW`BYcC<2>enG }
Janusbird3a { ; reproduced with Multifractal_1 ; original settings ; ; ; Version 2002 Patchlevel 5 reset=2002 type=formula formulafile=mult240.frm formulaname=multifractal_1 ismand=y function=exp/exp/exp/exp passes=1 center-mag=-0.488627/4.44089e-016/1.086909 params=-0.2724234748374889/0.09260841170049135/384.00001/2048.4505/768.0\ 256000000001/768.0256000000001/1025.0256/1536.0256/12284.5/11.16 float=y maxiter=2048 inside=maxiter outside=tdis logmap=4 periodicity=0 rseed=-2436 colors=200pppqqqsss<25>BBB999777<2>222000012<24>0bo0cq0es<3>0kz<25>09C08\ A068<2>022000211<22>keOmgPoiQqjRslSunT<2>zsX<25>CB7A96875<3>000400<23>o0\ 0q00s00<3>z00<25>C00A00800<3>000<28>nnn } --------------------------------start-frm----------------------------------- FRM:Multifractal_1 { ; Albrecht Niekamp 270503 ;only integers as first input, second input 5 digits to the right ;real(p2) factor1, border1 ;imag(p2) (-)bailout,input bas.frm1_2digits input bas.frm2_2digits ;real(p3) maxiter2, border2-in ;imag(p3) factor2, border2-out ;real(p4) maxiter3, border3-in ;imag(p4) factor3, border3-out ;real(p5) 1digit_shape only 5digits: shape,out1,out2,in1,in2 ; 1_mand 2_jul 3_hyb.mand 4_hyb.jul +5_reset (not shape) <0_no in/out1 ; optional basic frm2 digit1: 1_out1 2_out2 3_both +5_shape ; digit2: 1_in1 2_in2 3_both ;imag(p5) digit1 : many_mods multipl.shutoff 1_in/out1 2_in/out2 3_both ; digit2 :1_iter1reset 2_iter2reset 3_both +5_shape effect ; input2: Number of sides 2 digits (many_mods L.Allison) ; d=real(p2) fac1=trunc(d) b1=(d-fac1)*100000 ; d=imag(p2) da=d<0 if (da) d=-d endif ba=trunc(d) d=round((d-ba)*10000) p6=trunc(d/100)/10 d=d-1000*p6 if (da) p6=-p6 endif p7=d/10 ; d=real(p3) mi2=trunc(d) b2=(d-mi2)*100000 ; d=imag(p3) fac2=trunc(d) ob2=(d-fac2)*100000 ; d=real(p4) mi3=trunc(d) b3=(d-mi3)*100000 ; d=imag(p4) fac3=trunc(d) ob3=(d-fac3)*100000 ; da=real(p5) t=da<0 if (t) da=-da endif start=2-t dd=trunc(da) da=round((da-dd)*100) if (dd<5) start=0 vb=(dd==3)+(dd==4) else d=trunc(dd/10000) vb=(d==3)+(d==4) dd=dd-d*10000 d=trunc(dd/1000) dd=dd-d*1000 or1=d>5 d=d-5*or1 vv1=(d==3) vv2=(d==4) dd1=(d==2)+(d==4) d=trunc(dd/100) dd=dd-d*100 or2=d>5 d=d-5*or2 vv3=(d==3) vv4=(d==4) dd2=(d==2)+(d==4) d=trunc(dd/10) dd=dd-d*10 inr1=d>5 d=d-5*inr1 v1=(d==3) v2=(d==4) d1=(d==2)+(d==4) inr2=dd>5 dd=dd-inr2*5 v3=(dd==3) v4=(dd==4) d2=(dd==2)+(dd==4) endif ; d=trunc(da/10) da=da-10*d ab=d>=5 d=d-5*ab bb1=(d==1) bb2=(d==2) ab1=(da==1) ab2=(da==2) ; d=imag(p5) dd=trunc(d) mm=round((d-dd)*100) da=trunc(dd/10) so1=((da==1)+(da==3)==0) so2=((da==2)+(da==3)==0) dd=dd-10*da wo=dd>=5 dd=dd-5*wo ir1=(dd==1)+(dd==3) ir2=(dd==2)+(dd==3) ; if (ismand) z=0 if (vb) c=0.4*log(sqr(pixel^mm)) else c=pixel endif else c=p1 z=pixel endif t=0 tt=0 d3=(ismand==0) u=d3 : if (vb) if (d3) z=(z*z-real(c))^(z*u+imag(c)) else z2=fn4(z)+c ;Linda Allison q=cos(z2) z=c*(1-q)/(1+q) endif elseif (ab) z=z*z+c+c*c-p7 ;Pusk s Istv n elseif (d3) z2=z*z z=z2*z2+(p6+u)*z2+c else z2=z*z ;Pusk s Istv n z=z2*z2+(p6+u)*z2+c-p1 endif bo=|z| If (wo) t=t+1 if (bo>b1) u=2*(fn1(t/fac1)) if (ismand) z=z*u if (vb) c=0.4*log(sqr(pixel^mm)) else c=pixel endif else z=pixel c=p1*u endif wo=0 if (ir1) t=0 endif endif elseif (start) t=t+1 if (start==2) if (bo>b2&&bo<ob2) u=2*(fn2(t/fac2)) rs=or1 ab=bb1 if (dd1) if (rs) z=pixel endif c=p1*u vb=vv2 d3=vb else d3=0 z=z*u c=z if (rs) z=0 endif vb=vv1 if (vb) if (so1) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) endif start=1 endif elseif (t>mi2) u=2*(fn2(t/fac2)) rs=inr1 ab=ab1 if (d1) if (rs) z=pixel endif c=p1*u vb=v2 d3=vb else d3=0 z=z*u c=z if (rs) z=0 endif vb=v1 if (vb) if (so1) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) endif endif start=1 if (ir2) t=0 endif endif elseif (bo>b3&&bo<ob3) u=2*(fn3(t/fac3)) ab=bb2 rs=or2 if (dd2) if (rs) z=pixel endif c=p1*u vb=vv4 d3=vb else d3=0 z=z*u c=z if (rs) z=0 endif vb=vv3 if (vb) if (so2) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) endif start=0 endif elseif (t>mi3) u=2*(fn3(t/fac3)) ab=ab2 rs=inr2 if (d2) if (rs) z=pixel endif c=p1*u vb=v4 d3=vb else d3=0 z=z*u c=z if (rs) z=0 endif vb=v3 if (vb) if (so2) mm=mm+mm endif c=0.4*log(sqr(pixel^mm)) endif endif start=0 endif endif bo<=ba } ---------------------------------------end-----------------------------
participants (2)
-
Albrecht.Niekamp@t-online.de -
Lee H. Skinner