Another busy day at Action Central so today's posting will be brief- but not so brief
I won't mention the completed fractal is on display at http://maxitersfractalfollies.blogspot.com.
fract307.gif { ;Cobalt Capillaries-I just like the sound of it
; blank
; calctime 0:02:42.14
; created Jul 13, 2010
; Fractint Version 2004 Patchlevel 9
reset=2004 type=formula formulafile=_k.frm formulaname=km_10
passes=1
center-mag=-0.189282/-0.728366/7.747816/1/127.500000000000014/-7.5946193\
7782646146e-014
params=0.875/0.875/1.75/1.75/0.2483901486251411/-0.5270851771599475/-0.7\
5/-0.75 float=y maxiter=1500 inside=0 decomp=256 periodicity=0
colors=05F05F05F16G16G16G16G16G27H27H27H27H27H38I38I38I38I38I49J49J49J49\
J49J5AK5AK5AK5AK5AK6BL6BL6BL6BL7CM7CM7CM7CM7CM8DN8DN8DN8DN8DN9EO9EO9EO9E\
O9EOAFPAFPAFPAFPAFPBGQBGQBGQBGQBGQCHRCHRCHRCHRCHRDISDISDISDISDISEISEJTFJ\
TFKTGKUGLUHLVHMVIMVINWJNWJOWKOXKPXLPYLQYMQYMRZNRZNSZOS_OT_PT_PT`QU`QUaRV\
aRVaSWbSWbTXbTXcUYcUYcVZdVZdW_eW_eX`eX`fYafYafZbgZbg_ch_ch`ch`diadiaeibe\
jbfjcfjcgkdgkdhlehleilfimfjmgjmgknhknhlniloimojmpjmpknpknqloqloqmprmprnq\
snqsorsortpstpstqtuqturuuruvsvvsvwtwwtwwuxxuxxuxxvyyvyywzzvyyvyyuxxtxxtw\
wsvwsvvruvquuqtupstostorsnqsnqrmprlpqloqknpjnpjmoimohlnhkngkmgjmfjleileh\
kdhkcgjcfjbfibeiaeh`dh`cg_cgZbfZbfYaeX`eX`dW_dW_cVZcUYbUYbTXaSWaSW`RV`RV\
_QU_PTZPTZOSYNSYNRXMQXLQWLPWKPVKOVJNUINUIMTHLTGLSGKSFKRFJREIQDIQDHPCHPBG\
OBFOAFN9EN9EM8DM8CL7CL6BK6AK5AJ49J49I38I37H27H16G16G05F
}
frm:
km_10 { ; Kerry Mitchell
; originally conic-near_juli
; tweaked so user can directly input
; julia parameters (p4) originally hardcoded
; to 0,1
cc=p4, zc=pixel, maxr=1e12, minr=maxr, iter=1
a=real(p1), b=imag(p1), c=real(p2), d=imag(p2)
e=real(p3), f=imag(p3):
iter=iter+1, zc=sqr(zc)+cc, x=real(zc), y=imag(zc)
conic=|x*(a*x+b)+y*(c*y+d)+e*x*y+f|
if (conic<minr)
minr=conic
end if
if ((|zc|>maxr)||(iter==maxit))
iter=-1
t=log(minr)
z=cos(t)+flip(sin(t))
end if
iter>0
;SOURCE: kerrym.frm
}
Roger Alexander