.
Dr. J just got back from his laboratory where he has been preparing a special brew for the hated termites. But as luck would have it a crab like creature jumped from the aquarium and ate the termite in a single bite. So he settled down for an evening of FractoTube watching and reading. And he'd leave the termite hunting to the Red Headed Crab, Figure 1.
|
Figure 1. The Red Headed Crab.
Tonight's formula file uses exact tests to determine if pixels are in the cardioid or the circle, components with orbits having period 1 or 2. Pixels in these components are given special colors. Since the nature of these pixels is determined before iterations begin, the time consuming iterations otherwise used for these pixels is skipped.
Stay warm,
Jay
frm:ColoritM3 { ; (c) Jay Hill, 1998
done = 1, z = 0, zc = 0, c = pixel
s=|c|, t1=(256*s - 96)*s + 32*Real(c), t2=16*s + 32*Real(c) + 16
z=z + 251*(t1<=3) + 252*(t2<=1) ; set colors
if(z>0) ; for periods 1, 2
done=-1 ; color is set for c in a component, skip iterations
endif
: ; initialization.
zc=sqr(zc) + c ; standard MSet iteration
if (|zc| >= 4) ; Bailout at 4
done=-1 ; Set flag to force an exit.
endif
done >= 0 ; Continue if the flag >=0.
}
Red-headed-Crab { ; (c) Jay Hill, 1998
reset=1960 type=formula formulafile=color101.par
formulaname=coloritm3 center-mag=-2.02608/0/0.2128785/1/90 float=y
maxiter=2560 inside=251 outside=summ invert=1/0.5/0 symmetry=xaxis
periodicity=0
colors=00009U<19>9TbAUcAUcAUc<6>CXfU\
P8<45>ll8mm8mm8mm9<61>ZZmZZmZZl<89>6\
68668557457556<10>111mAAmK1w0K000KA8
savename=redhcrab
}
