home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.xmission.com
/
2014.06.ftp.xmission.com.tar
/
ftp.xmission.com
/
pub
/
lists
/
fractint
/
archive
/
v01.n602
< prev
next >
Wrap
Internet Message Format
|
2001-10-01
|
62KB
From: owner-fractint-digest@lists.xmission.com (fractint-digest)
To: fractint-digest@lists.xmission.com
Subject: fractint-digest V1 #602
Reply-To: fractint-digest
Sender: owner-fractint-digest@lists.xmission.com
Errors-To: owner-fractint-digest@lists.xmission.com
Precedence: bulk
fractint-digest Tuesday, October 2 2001 Volume 01 : Number 602
----------------------------------------------------------------------
Date: Sat, 29 Sep 2001 09:42:18 EDT
From: JimMuth@aol.com
Subject: (fractint) FOTD 29-09-01 (Aleph Null [7])
FOTD -- September 29, 2001 (Rating 7)
Fractal visionaries and enthusiasts:
Well, I didn't find a 9-rated fractal. I didn't even find one
that rates an 8. But I did find a fractal that is worth a 7,
and this is two points above the 5 we've been stuck with for the
past several days. The iterated formula subtracts some Z^(-1.1)
from Z^(1.2) before adding (1/C), and catches the parent fractal
when it is on the verge of turning inside-out.
With its broad textured cross and textured intricacies, today's
fractal is well worth the 3 minutes required to render it from
the parameter file. The name I gave it, "Aleph Null", is the
name of the transfinite number that represents the least
infinite of the infinity of infinities. I gave the image this
name for no apparent reason.
In addition to running the parameter file, the image may be seen
by downloading it from the W.W.W. at:
<http://home.att.net/~Paul.N.Lee/FotD/FotD.html>
or:
<http://sdboyd.dyndns.org/~sdboyd/fotd/index.html>
The fractal weather today was variably cloudy with a temperature
of 64F 18C. The cats found the porch warm enough during the
sunny periods, but retreated indoors when heavy clouds obscured
the sun and a chilly breeze sprang up.
I'll take a day or two break in my philosophical musings, but
I've still got enough ideas backed up to keep me going for
years. So stay tuned to the philofractal list for wisdom
unlimited delivered in a moderately humble manner.
That's it for today. Until next time, take care, and stay smart.
Jim Muth
jamth@mindspring.com
START 20.0 PAR-FORMULA FILE================================
Aleph_Null { ; time=0:03:35.03--SF5 on a P200
reset=2001 type=formula formulafile=allinone.frm
formulaname=MandelbrotMix4 function=recip passes=1
center-mag=+9.53758757820609500/+11.15144884977357\
000/1195.65/1/47.499 params=1/1.2/-0.8/-1.1/-0.07/0
float=y maxiter=1000 inside=0
logmap=58 periodicity=20
colors=000CKoCMtDKqEJnEHkFGhGFeGDbHC`HAYI9VJ8SJ6PK\
5MK4KMAMOFNQKPSPQUURWZTYcU_hVamXcrYewZeyLez8gvAhrB\
jnDkjElfGnbHoZJpVKkSGfPCaM9XJ5TH2WL9YOF_SLaVRcZYea\
cgeiihogdnfandZncWnaTm`Qm_NmYJmXGmVDlUAlS7lR4lQ1l`\
5mj9nhDofHpeLpcPqaTq`XrZ`rYdsWhsUltTptRtuQxuRwpSwl\
SwhTwdTv_UvWUvSVvOVuJWuFWuBXu7Xu3Wv4Vv5Uv6Tw7Sw8Sw\
9RxAQxBPxCOyDNyENyFSzGWzH`zHdzIizJmzJmwGmuHzsIzqJz\
oJzmKzmLzmMzmMzmPzmRwmUrmWmmYhm`cmbZmdUmgReiShlTjn\
TmpUpsVsuVuwTttStqQtoPtlOtiMsgLsdJsaIs_HsXFrUErSCr\
PBrMArKGpMMnORlQXjSaiTbjWckZdk`elcflfgmhhmkinmjnpk\
osloumpxnpzgqr`qjUqbNrWGrO9rG2r97pABnBFlCJjDNiDRgE\
VeFZcGbaHf`HcaJabL_cNYcPWdRUeTSeUZUqcZkgbekf_pjUtn\
OxrIpsPbsVet`htgkumnvsqwmtxgwybzzXzzSzzMzzHzzBzz6z\
zAzzEzzIzzLzzPzzTzzWzz_zzczzfzzjzznzzqzzhzz_zzSzzT\
zzTzzUzzUzzVzzVzzWzzWzzXzzXzzYzzYzzZzzZzz_zz_zzZzz\
ZzzYzzYzzLzzMzzSzzYzzczzi
}
frm:MandelbrotMix4 {; Jim Muth
a=real(p1), b=imag(p1), d=real(p2), f=imag(p2),
g=1/f, h=1/d, j=1/(f-b), z=(-a*b*g*h)^j,
k=real(p3)+1, l=imag(p3)+100, c=fn1(pixel):
z=k*((a*(z^b))+(d*(z^f)))+c,
|z| < l
}
END 20.0 PAR-FORMULA FILE==================================
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Sun, 30 Sep 2001 10:25:51 EDT
From: JimMuth@aol.com
Subject: (fractint) FOTD 30-09-01 (Sawteeth [3])
FOTD -- September 30, 2001 (Rating 3)
Fractal visionaries and enthusiasts:
As even a casual glance reveals, today's fractal, which is the
final one for the month of September, has no tiny midget lurking
at its center.
Most of my time in fractal land is spent tracking those elusive
midgets. On the trail of the midgets, I often come upon quite a
bit of interesting scenery, which I pass by without recording.
In today's fractal, I found no midgets -- the expression being
iterated, Z^0.009+C, is too close to linear -- but I did come
upon some curious scenery, and this time I did not pass it by.
I present it instead as today's FOTD, to show some of the lesser
things that exist in the world of fractals, but are too often
ignored.
The parent fractal is a cucumber-shaped lake with mostly sharp,
well-defined edges. One corner of the shoreline however holds
an area of chaos. It is in this area of chaos that today's
scene is found.
Despite its initial chaotic impression, the image is filled with
themes -- bits and pieces of order that appear regularly spaced
throughout the image. I particularly enjoy the tiny black
upside-down triangles scattered about the lower left quadrant.
The reason that I named the scene "Sawteeth" is obvious. The
reason I rated it at only a 3 is because of its poor
composition. It has no focus of attention to prevent the eye
from scanning it in a haphazard manner.
The 25 minute render time is a bit slow for such a lowly image.
This problem can be avoided however by giving Paul and Scott a
chance to render and post the image to their web sites, and then
picking it up from there.
Paul's web site is at:
<http://home.att.net/~Paul.N.Lee/FotD/FotD.html>
Scott's is at:
<http://sdboyd.dyndns.org/~sdboyd/fotd/index.html>
The fractal weather today was a repeat of yesterday, with
alternating sunny and overcast periods, and a temperature of 64F
18C. The cats accepted the conditions, though they did not
approve of them.
I'll have one more philosophy-free day to recharge my batteries.
Then it's back to my task of humbly enlightening the world, an
oxymoron if there ever was one.
We've come to the end of another FOTD. I'm going to do nothing
for the rest of the day -- unless I start searching for
fractals, that is. Until next time, take care, and it's better
to be wise than smart, but it's best to be wise and smart.
Jim Muth
jamth@mindspring.com
START 20.0 PAR-FORMULA FILE================================
Sawteeth { ; time=0:25:39.34--SF5 on a P200
reset=2001 type=formula formulafile=allinone.frm
formulaname=MandelbrotBC1 function=floor passes=1
center-mag=+0.54393341766901080/-0.256307459919719\
80/942.2051/1/40 params=1.009/0/-12/1500 float=y
maxiter=5000 inside=255 logmap=366
colors=000tYhsXgrWfqWfpVeoVenUdmTclTckSbjSbiRahQ`g\
Q`fP_eP_dOZcNYbNYaMX`NW_MXZMXYMXXMXWMXVLXULXTLXSLX\
RLXQLXPKXOKXNKXMKWLKVKJUJITIISHIRGHQFHPEHOEFNEFMEF\
LEEKEDKFCKFAKF9KF8KG7KG8KG9KG9KGAKHBKHCKHDKHDKHEKI\
FKIFKIFKIFLJEMJENJEOJEPJEQKERKFSKGTKHUKIVLJWMKXNLX\
OMXPNXQOXRPXSQXTRXUSXVTXWUXXVXYWVZXX_YZ`Z`a_bb`cca\
edbgecifdkgelhfnigpjhrkislhsmhslhslgslgskgskfskfsj\
fsjesjesiesidsidshdshcshcsgcsgbsgbsfbsfbseaseaseas\
dasd`sd`sc`sc`sc_sb_sb_sb_saZsaZsaYs`Zs`Ys`Ys_Ys_Y\
sZXsZXsZXsYXsYWsYWsXWsXWsXVsWVsWVsWVsVUsVUsVUsUTsU\
TsUTsTSsTSsSRsSQsSPsROsRNsRMsQLsQKsQKsPKsPKsPKsOKs\
OKsOKsNKsNKsNKsMKsMKsLKsLKsLKsKKsKKsKKtJKuJKvJKwIK\
xIKyIKzHKzHKzHKzGKzGKzGKzFKzFKzFKzJKzKKzKKzKKzKKzK\
KzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKz\
KKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKKzKK\
zKKzKKzKKzKKzKKzKKzKKzKKz
}
frm:MandelbrotBC1 { ; by several Fractint users
e=p1, a=imag(p2)+100
p=real(p2)+PI
q=2*PI*fn1(p/(2*PI))
r=real(p2)-q
Z=C=Pixel:
Z=log(Z)
IF(imag(Z)>r)
Z=Z+flip(2*PI)
ENDIF
Z=exp(e*(Z+flip(q)))+C
|Z|<a
}
END 20.0 PAR-FORMULA FILE==================================
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 1 Oct 2001 11:47:07 +1200
From: <packrat@nznet.gen.nz>
Subject: (fractint) Fractal Extremes Can Predict Impending Breakdowns
How long will a steel pillar support a bridge before rust eats deep enough to
let it snap? How long will a container of corrosive acid hold before it
springs a leak?
http://unisci.com/stories/20013/0928012.htm
Morgan L. Owens
"I'm too lazy to write anything myself."
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 1 Oct 2001 00:47:25 +0100
From: "Les St Clair" <les.stclair@btinternet.com>
Subject: (fractint) Parameter files updated
Hi everyone,
For information, I have (at long last) updated my collection of parameter
files culled from this list.
Monthly collections from way back when, plus all of Jim's FOTD pars, are now
bang up to date.
You can find them on my fractal web site at:
http://www.les.stclair.btinternet.co.uk/fractals/fracindex.htm
(scroll down to the "resource, links" part of the page)
cheers, Les
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Sat, 29 Sep 2001 09:42:18 EDT
From: JimMuth@aol.com
Subject: (fractint) [philofractal] FOTD 29-09-01 (Aleph Null [7])
FOTD -- September 29, 2001 (Rating 7)
Fractal visionaries and enthusiasts:
Well, I didn't find a 9-rated fractal. I didn't even find one
that rates an 8. But I did find a fractal that is worth a 7,
and this is two points above the 5 we've been stuck with for the
past several days. The iterated formula subtracts some Z^(-1.1)
from Z^(1.2) before adding (1/C), and catches the parent fractal
when it is on the verge of turning inside-out.
With its broad textured cross and textured intricacies, today's
fractal is well worth the 3 minutes required to render it from
the parameter file. The name I gave it, "Aleph Null", is the
name of the transfinite number that represents the least
infinite of the infinity of infinities. I gave the image this
name for no apparent reason.
In addition to running the parameter file, the image may be seen
by downloading it from the W.W.W. at:
<http://home.att.net/~Paul.N.Lee/FotD/FotD.html>
or:
<http://sdboyd.dyndns.org/~sdboyd/fotd/index.html>
The fractal weather today was variably cloudy with a temperature
of 64F 18C. The cats found the porch warm enough during the
sunny periods, but retreated indoors when heavy clouds obscured
the sun and a chilly breeze sprang up.
I'll take a day or two break in my philosophical musings, but
I've still got enough ideas backed up to keep me going for
years. So stay tuned to the philofractal list for wisdom
unlimited delivered in a moderately humble manner.
That's it for today. Until next time, take care, and stay smart.
Jim Muth
jamth@mindspring.com
START 20.0 PAR-FORMULA FILE================================
Aleph_Null { ; time=0:03:35.03--SF5 on a P200
reset=2001 type=formula formulafile=allinone.frm
formulaname=MandelbrotMix4 function=recip passes=1
center-mag=+9.53758757820609500/+11.15144884977357\
000/1195.65/1/47.499 params=1/1.2/-0.8/-1.1/-0.07/0
float=y maxiter=1000 inside=0
logmap=58 periodicity=20
colors=000CKoCMtDKqEJnEHkFGhGFeGDbHC`HAYI9VJ8SJ6PK\
5MK4KMAMOFNQKPSPQUURWZTYcU_hVamXcrYewZeyLez8gvAhrB\
jnDkjElfGnbHoZJpVKkSGfPCaM9XJ5TH2WL9YOF_SLaVRcZYea\
cgeiihogdnfandZncWnaTm`Qm_NmYJmXGmVDlUAlS7lR4lQ1l`\
5mj9nhDofHpeLpcPqaTq`XrZ`rYdsWhsUltTptRtuQxuRwpSwl\
SwhTwdTv_UvWUvSVvOVuJWuFWuBXu7Xu3Wv4Vv5Uv6Tw7Sw8Sw\
9RxAQxBPxCOyDNyENyFSzGWzH`zHdzIizJmzJmwGmuHzsIzqJz\
oJzmKzmLzmMzmMzmPzmRwmUrmWmmYhm`cmbZmdUmgReiShlTjn\
TmpUpsVsuVuwTttStqQtoPtlOtiMsgLsdJsaIs_HsXFrUErSCr\
PBrMArKGpMMnORlQXjSaiTbjWckZdk`elcflfgmhhmkinmjnpk\
osloumpxnpzgqr`qjUqbNrWGrO9rG2r97pABnBFlCJjDNiDRgE\
VeFZcGbaHf`HcaJabL_cNYcPWdRUeTSeUZUqcZkgbekf_pjUtn\
OxrIpsPbsVet`htgkumnvsqwmtxgwybzzXzzSzzMzzHzzBzz6z\
zAzzEzzIzzLzzPzzTzzWzz_zzczzfzzjzznzzqzzhzz_zzSzzT\
zzTzzUzzUzzVzzVzzWzzWzzXzzXzzYzzYzzZzzZzz_zz_zzZzz\
ZzzYzzYzzLzzMzzSzzYzzczzi
}
frm:MandelbrotMix4 {; Jim Muth
a=real(p1), b=imag(p1), d=real(p2), f=imag(p2),
g=1/f, h=1/d, j=1/(f-b), z=(-a*b*g*h)^j,
k=real(p3)+1, l=imag(p3)+100, c=fn1(pixel):
z=k*((a*(z^b))+(d*(z^f)))+c,
|z| < l
}
END 20.0 PAR-FORMULA FILE==================================
- ---------------------------------------------------------------------
To unsubscribe, e-mail: philofractal-unsubscribe@lists.fractalus.com
For additional commands, e-mail: philofractal-help@lists.fractalus.com
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 01 Oct 2001 07:48:17 -0700
From: David Boddington <pdbod@home.com>
Subject: Re: (fractint) Fractal Extremes Can Predict Impending Breakdowns
At 11:47 AM 01-10-01 +1200, Morgan L Owens wrote:
>How long will a steel pillar support a bridge before rust eats deep enough to
>let it snap? How long will a container of corrosive acid hold before it
>springs a leak?
If a man makes a statement in a forest and there is no woman there to hear
him......
is he still wrong?
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 1 Oct 2001 07:53:20 -0700 (PDT)
From: kelly christiansen <darkwolf1_us@yahoo.com>
Subject: Re: (fractint) Fractal Extremes Can Predict Impending Breakdowns
- --- David Boddington <pdbod@home.com> wrote:
> At 11:47 AM 01-10-01 +1200, Morgan L Owens wrote:
>
> >How long will a steel pillar support a bridge before rust eats deep enough
> to
> >let it snap? How long will a container of corrosive acid hold before it
> >springs a leak?
>
>
> If a man makes a statement in a forest and there is no woman there to hear
> him......
> is he still wrong?
>
of course
=====
******************************************************************
Fractal resources available at
http://cyberwizards.com/~hub/fractal
To subscribe to fractaltalk, send a message to listar@wru.org with"subscribe fractaltalk" in the body.
To unsubscribe from fractaltalk, send a message to listar@wru.org with"unsubscribe fractaltalk" in the body.
******************************************************************
__________________________________________________
Do You Yahoo!?
Listen to your Yahoo! Mail messages from any phone.
http://phone.yahoo.com
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 01 Oct 2001 09:59:34 -0500
From: "Scott D. Boyd" <sdboyd56@swbell.net>
Subject: Re: (fractint) FOTD 29-09-01 (Aleph Null [7])
Hey Jim,
Oops!
I don't know if anyone else received it, but I just received the FOTD from
Sept. 29th.
Scott
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 01 Oct 2001 10:05:42 -0500
From: "Paul N. Lee" <Paul.N.Lee@Worldnet.att.net>
Subject: Re: (fractint) FOTD 29-09-01 (Aleph Null [7])
Scott D. Boyd wrote:
>
> I don't know if anyone else received it,
> but I just received the FOTD from Sept. 29th.
>
I just received a second copy, but it was as if it came from the
Philofractal List.
Maybe Damien's EZMLM mail server, or the new IP address move, is having
difficulties. I know that the Development Team is definitely
experiencing problems on Damien's machine.
Sincerely,
P.N.L.
- --------------------------------------------------------------
http://www.fractalus.com/cgi-bin/theway?ring=fractals&id=43&go
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 1 Oct 2001 11:06:10 -0400 (EDT)
From: Jim Muth <jamth@mindspring.com>
Subject: (fractint) FOTD 01-10-01 (Spectacle [4])
FOTD -- October 01, 2001 (Rating 4)
Fractal visionaries and enthusiasts:
Today's fractal, which was calculated with a bailout of 400, was
created by adding 0.6 parts of Z^(-16) to 6 parts of Z^(-1.6),
and then adding (1/C). The parent fractal is a many-bayed
affair, with more valleys than the garden here at Fractal
Central has butterflies. The scene of today's image is located
at the tip of a spiral filament extending from a tiny bud on the
south shore of a curved valley in the north section of a
secondary bay at the east end of the parent fractal.
It's probably easier to zoom out of today's image and see just
where it is located in relation to the whole fractal than it is
to make sense of that last sentence.
I named the image "Spectacle". It's true that all fractals are
spectacles, (though all spectacles are not fractals). But I
don't recall having used the word before, and though today's
image rates only a humble 4 IMO, it is still worth being called
a spectacle.
The spectacular scene takes 15 minutes to unfold from the
parameter file. The scene can be seen in far less time by
waiting an hour or so until Paul and Scott have had a chance to
post the GIF image to their web sites at:
<http://home.att.net/~Paul.N.Lee/FotD/FotD.html>
and at:
<http://sdboyd.dyndns.org/~sdboyd/fotd/index.html>
and downloading it from there. (Don't ask how the image can be
seen in less time than 15 minutes by waiting an hour. It's a
mystery.)
The fractal weather today continued chilly for the season, with
clouds and a temperature of 62F 16.5C, which left the cats cold.
They spent the day on their shelf by the window, watching the
world outside, wishing it were warmer, and perking up only when
another cat came into sight. At nightfall, a shower of rain
began, but by that time, the day had already been spoiled.
It's now time to shift gears into a more practical mode. When I
finish the things that need to be done, I might get back to that
FOTD-CD that I've been thinking of. Until next time, which will
be tomorrow around this same time, take care, and be as peaceful
as possible.
Jim Muth
jamth@mindspring.com
START 20.0 PAR-FORMULA FILE================================
Spectacle { ; time=0:15:34.61--SF5 on a P200
reset=2001 type=formula formulafile=allinone.frm
formulaname=MandelbrotMix4 function=recip passes=1
center-mag=+1.22164249176614300/+0.300496616260909\
60/5.076234e+007/1/-95 params=6/-1.6/0.6/-16/0/300
float=y maxiter=3600 inside=0 logmap=243
colors=000FkzFmzKhzFmzB`z4Qz0Dw00p00i00b00Z00V40S9\
0OF0KK0HQ0DT09Z04d00i00g00e00e00d04b07b09`0BZ0FZ0H\
X0IV0KV0OT0QS0SS0VQ0XO0ZO0`M0dK0eK0gI0iH0mH0nF0pH0\
vF0tF0rF0pF0pF0nF4mF9kDDkDHiDKgDQeDTeDXdD`b0Zk7beD\
dbKeZQiTXkQbmMgpHnrDtt9zw2zy0zz0zz0zz0zw0zv0zt0yp2\
vn4rm7ni7kg9geBebDb`FZZHVVISTKQSKSTQTVTTXZVZbX`gX`\
kZbpZdt`ewbgzbgzdizekzemzgnzdzzevzgnzigzi`zkTzmMzm\
Fzn7zp0zz0zp0zr0zk0zi2ze7udBp`FkZIfXMfTQfSTkOVpMZu\
IbzHeyFiyBmw9pvKttUwrczpmznwzkwzmwznwzpwzrrzrmzthz\
vczwczyczyczzczzUzzKzz7zz7zz9yz9yzBm0BmzzwmDwzDwzF\
wzFvzHhzHvzDzzHvzIpzMmzOgzSbzTZzXTzZQzbKzdFzgBzi4z\
k0zrTywrZzz7yzBwzFtyIrrMnmOmgSi`VgVZdQbbIdZDgXDkTF\
nSHrQItSKvSMwSOwSQySSzSTzSVzTXzTZzT`zTbzTdzTezTgzV\
izVkzVmzVnzVpzVrzVtzXvzXwzXyzXzzXzzXzzXzzTzzXzzZzz\
`zzdzzezzgzzizzmzznzzpzzrzzvzzwzzyzzzzzzzzzzzzzzzz\
zzzyzzwzzwtzzXzz9zzFzzIzz
}
frm:MandelbrotMix4 {; Jim Muth
a=real(p1), b=imag(p1), d=real(p2), f=imag(p2),
g=1/f, h=1/d, j=1/(f-b), z=(-a*b*g*h)^j,
k=real(p3)+1, l=imag(p3)+100, c=fn1(pixel):
z=k*((a*(z^b))+(d*(z^f)))+c,
|z| < l
}
END 20.0 PAR-FORMULA FILE==================================
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 1 Oct 2001 11:07:30 -0400 (EDT)
From: Jim Muth <jamth@mindspring.com>
Subject: Re: (fractint) FOTD 29-09-01 (Aleph Null [7])
At 09:59 AM 10/1/01 -0500, you wrote:
>Hey Jim,
>
>Oops!
>
>I don't know if anyone else received it, but I just received the FOTD from
>Sept. 29th.
>
>Scott
I got the old FOTD also. Something must have hiccoughed.
Jim M.
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 1 Oct 2001 21:09:03 +0200
From: Michael Weitzel <weitzel@ldknet.org>
Subject: (fractint) Lyapunov ...
Hi,
I have written a program for calculating the famous Lyapunov diagrams.
That's the good news ;-) The bad news is that it won't run under
Windows/DOS. It needs a Unix env. with X-Server (e.g. Linux; with
recommended color depth of 15 bit and up). Default-formula is
x(t+1)=r*x(t)*(1-x(t)) (aka "logistic"), but there 11 other (perhaps
more interesting) formulas. Default sequence for parameter r is "AB"
... play with it. If you have zoomed into an area with 'weak' texture,
try pressing the middle mouse button to start a recoloring function
which tries to adjust the colors according to their distribution.
download sources at:
http://www.ldknet.org/hp/mweitzel/ljapunow_exp.tar.gz
Together with this Lyapunov program comes a Mandelbrot generator which
uses PVM (parallel virtual machine; to distribute the calculation over
the LAN) an true color methods for incolor/outcolor. Press "j" to
switch Julia-mode.
I've put some examples together with some theoretic background (in
german ... sorry; I will translate this page if someone is interested)
on my homepage (see below).
btw: maybe you will occur problems because of the "-march=i686" if your
machine doesn't support it ... simply remove it.
btw^2: default target for Makefile ist "ljap". If you want to try out
the "Apple Man" type "make mandel".
have fun :-)))
- --
Michael --- http://www.ldknet.org/hp/mweitzel/
*Weitzel* --- email: michael(at)ldknet.org
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 1 Oct 2001 19:59:07 -0500
From: "Jonathan Osuch" <osuchj@qwest.net>
Subject: (fractint) Fractint version 20.2.0
Folks,
Fractint version 20.2.00 is now available at the developer's web site:
www.fractint.org
What's new:
Incremented the version number to accommodate backwards compatibility for
the logmap option.
Modified the logmap routine so that the color with index # 2 would be
displayed.
Added a logmode=auto command line option that causes the logmap to adjust
automatically when zooming. Changing almost anything will turn this
feature off. It is best set using the <g> screen prompt.
Edited the help docs to document the move of the development area from
Compuserve to the web.
Jonathan
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Mon, 01 Oct 2001 21:46:26 -0700
From: Mark Christenson <mchris@value.net>
Subject: Re: (fractint) Fractint version 20.2.0
At 07:59 PM 10/1/01 -0500, Jonathan wrote:
>...
>What's new:
>...
>Modified the logmap routine so that the color with index # 2 would be
>displayed.
Thanks for that one! I had been working around it by subtracting
one from the automatic selection.
>Added a logmode=auto command line option that causes the
>logmap to adjust automatically when zooming.
Cool! Could it also be done via the "x" menu? Or am I confusing
logmode and logmap?
Aloha,
Bud
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Tue, 02 Oct 2001 08:56:21 +0000
From: "Andrew Coppin" <orphi69@hotmail.com>
Subject: Re: (fractint) FOTD 01-10-01 (Spectacle [4])
>From: Jim Muth <jamth@mindspring.com>
>Reply-To: fractint@lists.xmission.com
>To: fractint@lists.xmission.com
>Subject: (fractint) FOTD 01-10-01 (Spectacle [4])
>Date: Mon, 1 Oct 2001 11:06:10 -0400 (EDT)
>
>
>FOTD -- October 01, 2001 (Rating 4)
Mmmm.... In my *equally* humble opinion, that should rate at least 5, but
still...
BTW, where I am (sunny England) it's currently 10am on the 1st of October,
yet the FotD for the 1st is already up. I thought America was abotu 12 hours
BEHIND GMT?... Anyone care to explane this to me?
Andrew.
"Where the heck IS the I.D.L. anyway???"
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Tue, 02 Oct 2001 04:20:12 -0500
From: "Scott D. Boyd" <sdboyd56@swbell.net>
Subject: Re: (fractint) FOTD 01-10-01 (Spectacle [4])
On Tuesday 02 October 2001 03:56, Andrew wrote:
> BTW, where I am (sunny England) it's currently 10am on the 1st of October,
> yet the FotD for the 1st is already up. I thought America was abotu 12
> hours BEHIND GMT?... Anyone care to explane this to me?
>
Starting on the east coast of the U.S., where Jim Muth is at, the EDT zone is
only 4 hrs. behind GMT. There's 4 time zones for the mainland of U.S. and
Hawaii is (I believe) 9 or 10 hours behind GMT.
Sometimes Jim posts the FOTD to the mailing list the night before, but that
doesn't happen too often. This time, Jim posted the FOTD for Oct. 1st at
11:06 EDT (or 15:06 GMT) on Oct 1st.
You said it was "currently 10am on the 1st of October", but according to the
email header of your email, the fractint mailing list didn't get your email
until approx. 23 hours later! There's another conundrum for you!
My take on it:
Either Earth is spinning in reverse, (or maybe it occasionally stalls in it's
orbit...) or it's just another one of those mysteries of life...... Take your
pick....
Scott Boyd
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Tue, 02 Oct 2001 11:26:04 +0000
From: "Andrew Coppin" <orphi69@hotmail.com>
Subject: Re: (fractint) FOTD 01-10-01 (Spectacle [4])
>From: "Scott D. Boyd" <sdboyd56@swbell.net>
>Reply-To: fractint@lists.xmission.com
>To: fractint@lists.xmission.com
>Subject: Re: (fractint) FOTD 01-10-01 (Spectacle [4])
>Date: Tue, 02 Oct 2001 04:20:12 -0500
>
>You said it was "currently 10am on the 1st of October", but according to
>the
>email header of your email, the fractint mailing list didn't get your email
>until approx. 23 hours later! There's another conundrum for you!
>
>My take on it:
>Either Earth is spinning in reverse, (or maybe it occasionally stalls in
>it's
>orbit...) or it's just another one of those mysteries of life...... Take
>your
>pick....
>
>Scott Boyd
The trueth is far simpler... I am the proud owner of a very nice watch. But
unfortunatly it's mechanical. Due to this, the poor device is under the
impression that every single month of the year has 31 days in it. Thus, the
watch believed that Monday was the 31 of September, and thus today is the
1st of October.
So I looked at Jim's (very nice) Fractal, checked my watch and thought
"kore, that's bloomin fast!" and proceeded to ask how this was possible. I
have now realised that it is in fact the SECOND day of october today
(aaarrrrggggh!!!!)
How stupid am I?
Thanks.
Andrew.
(PS. you don't have to answer that question!)
_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Tue, 2 Oct 2001 10:43:20 -0400 (EDT)
From: Jim Muth <jamth@mindspring.com>
Subject: (fractint) FOTD 02-10-01 (Run for Cover [7])
FOTD -- October 02, 2001 (Rating 7)
Fractal visionaries and enthusiasts:
Today's image has been named "Run for Cover". Given the world
situation, such a name would appear to have a deep psychological
significance. And perhaps it does. The name came to me when I
put my mind into idle. (An easy task.) It came of its own
accord, like an image in an inkblot. The image's slightly
sinister aura would seem to reinforce the psychological origin
of the name.
The formula behind the image subtracts some 1/Z from some Z, and
creates a curiously distorted Mandeloid that is extremely
sensitive to the value of the real(p3) parameter, being ready to
expand to infinity or shrink to nothing at the slightest change
of that parameter.
Despite its ominous overtones, today's image rates a 7. It's
also a fast image, taking only 2 minutes on a worn-out old
Pentium 200mhz machine. The GIF image can also be seen by
downloading it from:
<http://home.att.net/~Paul.N.Lee/FotD/FotD.html>
or from:
<http://sdboyd.dyndns.org/~sdboyd/fotd/index.html>
The fractal weather today (Monday the 1st) was cloudy and cool,
not the best conditions to make fractal cats happy, but the cats
found what happiness they could, sleeping on the porch in the
warmth of the little bit of sunlight filtering through the
clouds. The temperature of 66F 19C was somewhat below average.
There's so much activity on the philofractal list that I must
take a day or two to digest it before offering more philosophy.
And I must also keep the discussion from wandering totally away
from the topic of fractals. Look for more wisdom, possibly as
soon as the next FOTD.
For now, I've got a day's work to finish and a couple annoying
cats to feed. Until next time, take care, and a diet of
fractals can really make those pounds and inches disappear.
Jim Muth
jamth@mindspring.com
START 20.0 PAR-FORMULA FILE================================
Run_for_Cover { ; time=0:02:26.32--SF5 on a P200
reset=2002 type=formula formulafile=allinone.frm
formulaname=MandelbrotMix4 function=recip passes=1
center-mag=-0.02829866980610058/-0.064453758425730\
76/1.908413e+007/1/177.499999994679371/5.664339275\
4018862e-009 params=-1/-1/1/1/-2.1/800 float=y
maxiter=1200 inside=0 outside=summ
colors=000oZctXayV_uTXrSUnRRkQOgOLdNI`MFYLCUJ9RI6N\
H3KG1NF6QEATDEWCIZBMaAQd9Vg8Zj7bm6fp5js4nu4rr5qo5q\
l5pi6pf6oc6o`6nY7nV7mS7mQ7mRJXRVHRe1Q_4QV6QQ9QLBQG\
DQBGQ6IQ1KP4MP6OP8QPASPCUPEWPGYPI_OLaONcOPeORgOTiO\
VkOXmOZnPXiQWeRUaRTYSRUTQQUNLPLHLIDHG9DD58B1BE5JI8\
QNBYSEeXHlaKofNrkQupTxtWzxZxtYvqYsmYqjYnfYlcYj_YhX\
YfTYdQYbMY`JYbMWdOVeQUgTThVSjXRk_QmaPncOpfNqhMsjLt\
mKvoJwqIvpLuoNunPtmRsmTslVrkXqjZqi`pibohdogfnfhmej\
mellaklYjkUikQhjMhjIgiEfiAei7egAafDZeGWdJTbMPaPM`R\
J_UGYXCX_9Wb6Ve3Ug0Wf1Xf2Ze3_e4ad5bd6cd7ec8fc9hbAi\
bBkaClaDmaDsdCyfBteEpeHkdKgdMbcPZcSUbVQbXLa_HabDad\
HcaLdZPeWTgTXhQ`iNdkKhlHkmFB4PHAQNGQTLQZRQcWQeVKhV\
DjU7lU1ciAWxJYsH_nGaiFcdDe_CgVBiQAkL8mG7oB6q75tCMw\
HbvIevIgvIivIkvImvIovIqZJ8YOAXTBWXCVaDUeETjFSnGRsH\
RwILhDFV9JZ9Na9Qd9Uh9Yk9`n9dr9hu9kx9luDlsHmqLmoOnm\
SnkWoiZofbpdfpbj_didbgi`e
}
frm:MandelbrotMix4 {; Jim Muth
a=real(p1), b=imag(p1), d=real(p2), f=imag(p2),
g=1/f, h=1/d, j=1/(f-b), z=(-a*b*g*h)^j,
k=real(p3)+1, l=imag(p3)+100, c=fn1(pixel):
z=k*((a*(z^b))+(d*(z^f)))+c,
|z| < l
}
END 20.0 PAR-FORMULA FILE==================================
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Tue, 02 Oct 2001 10:34:30 -0500
From: "Scott D. Boyd" <sdboyd56@swbell.net>
Subject: Re: (fractint) FOTD 01-10-01 (Spectacle [4])
On Tuesday 02 October 2001 06:26, you wrote:
> From: "Scott D. Boyd" <sdboyd56@swbell.net>
>
> The trueth is far simpler... I am the proud owner of a very nice watch. But
> unfortunatly it's mechanical. Due to this, the poor device is under the
> impression that every single month of the year has 31 days in it. Thus, the
> watch believed that Monday was the 31 of September, and thus today is the
> 1st of October.
>
> So I looked at Jim's (very nice) Fractal, checked my watch and thought
> "kore, that's bloomin fast!" and proceeded to ask how this was possible. I
> have now realised that it is in fact the SECOND day of october today
> (aaarrrrggggh!!!!)
>
Therin lies the answer to one of the mysteries of life, ie: how can an FOTD
be generated before it's appointed time....
> How stupid am I?
>
Right - we won't go there....
Scott
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Tue, 2 Oct 2001 18:37:15 +0100
From: John Lewis <jlewis@clara.net>
Subject: (fractint) OT: IDL
On Tue, 02 Oct 2001 08:56:21 +0000, Andrew Coppin wrote,=
wondering
about electronic posting dates:
[cut]
Andrew. "Where the heck IS the I. D. L. anyway???"
Several letters before the IDS.
[Obscure UK political joke]
- -- John Lewis, jlewis@clara.net on 10/02/2001
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
Date: Tue, 2 Oct 2001 19:06:53 EDT
From: RParracho@aol.com
Subject: (fractint) Formula file a couple pars
- --part1_fd.d00644f.28eba28d_boundary
Content-Type: multipart/alternative;
boundary="part1_fd.d00644f.28eba28d_alt_boundary"
- --part1_fd.d00644f.28eba28d_alt_boundary
Content-Type: text/plain; charset="US-ASCII"
Content-Transfer-Encoding: 7bit
i cleaned up some of my formula files and have attached it. most of them are
excelent for the evolver. its to bad that no one exchanges formulas and pars
any more on the list.
tiltawhirl { ; 0:01:18.59
; Created Oct 02, 2001 by Rui Parracho (c)
; Send comments to rparracho@aol.com
; Version 2001 Patchlevel 13
reset=2001 type=formula formulafile=rsp.frm formulaname=rsp_0300h4
center-mag=0/0/0.6666667
params=0.0184636982329783/-0.3060090945158239 float=y maxiter=500
bailout=256 periodicity=0 rseed=3141
colors=000000<24>nGOpHPrHQ<3>zKU<25>C46A35834<2>211000000<9>000000000<2>\
000010030<23>0n00p00r0<3>0z0<25>0C00A0080<2>020000000<9>000000000<2>0001\
10330<23>nn0pp0rr0<3>zz0<25>CC0AA0880<2>220000000<29>000
}
fronteira { ; 0:01:02.06
; Created Oct 02, 2001 by Rui Parracho (c)
; Send comments to rparracho@aol.com
; Version 2001 Patchlevel 13
reset=2001 type=formula formulafile=rsp.frm
formulaname=Regula_falsi3 center-mag=-0.594679/0.14405/4.901961
params=-0.9143650624103519/-0.163060396130253/-0.108981597338786/0.67094\
94308297983/0.9063692129276406/-0.7294839320047609 float=y
maxiter=500 bailout=256 periodicity=0 rseed=3141
colors=CCCqz0<10>KN0GJ0DF0<3>000<10>6c07g07k0<3>Az0<10>4N03J03F0<3>000<1\
0>0cM0gO0kQ<3>0zZ<10>0ND0JB0F9<3>000<10>8Wc9Zg9ak<3>Dmz<10>5IN4FJ4CF<3>0\
00<10>V9cXAg_Bk<3>kFz<10>H6NF5JC4F<3>000<10>c7Xg7_k8b<3>zBo<10>N4JJ4GF3D\
<3>000<10>cMIgOKkQM<3>zYT<10>NCBJA9F87<3>000<9>bY5f`5jd6<3>zr8<8>yN4xJ3x\
F3<3>w00tz0000
}
- --part1_fd.d00644f.28eba28d_alt_boundary
Content-Type: text/html; charset="US-ASCII"
Content-Transfer-Encoding: 7bit
<HTML><FONT FACE=arial,helvetica><FONT SIZE=2>i cleaned up some of my formula files and have attached it. most of them are excelent for the evolver. its to bad that no one exchanges formulas and pars any more on the list.
<BR>
<BR>tiltawhirl { ; 0:01:18.59
<BR> ; Created Oct 02, 2001 by Rui Parracho (c)
<BR> ; Send comments to rparracho@aol.com
<BR> ; Version 2001 Patchlevel 13
<BR> reset=2001 type=formula formulafile=rsp.frm formulaname=rsp_0300h4
<BR> center-mag=0/0/0.6666667
<BR> params=0.0184636982329783/-0.3060090945158239 float=y maxiter=500
<BR> bailout=256 periodicity=0 rseed=3141
<BR> colors=000000<24>nGOpHPrHQ<3>zKU<25>C46A35834<2>211000000<9>000000000<2>\
<BR> 000010030<23>0n00p00r0<3>0z0<25>0C00A0080<2>020000000<9>000000000<2>0001\
<BR> 10330<23>nn0pp0rr0<3>zz0<25>CC0AA0880<2>220000000<29>000
<BR> }
<BR>
<BR>fronteira { ; 0:01:02.06
<BR> ; Created Oct 02, 2001 by Rui Parracho (c)
<BR> ; Send comments to rparracho@aol.com
<BR> ; Version 2001 Patchlevel 13
<BR> reset=2001 type=formula formulafile=rsp.frm
<BR> formulaname=Regula_falsi3 center-mag=-0.594679/0.14405/4.901961
<BR> params=-0.9143650624103519/-0.163060396130253/-0.108981597338786/0.67094\
<BR> 94308297983/0.9063692129276406/-0.7294839320047609 float=y
<BR> maxiter=500 bailout=256 periodicity=0 rseed=3141
<BR> colors=CCCqz0<10>KN0GJ0DF0<3>000<10>6c07g07k0<3>Az0<10>4N03J03F0<3>000<1\
<BR> 0>0cM0gO0kQ<3>0zZ<10>0ND0JB0F9<3>000<10>8Wc9Zg9ak<3>Dmz<10>5IN4FJ4CF<3>0\
<BR> 00<10>V9cXAg_Bk<3>kFz<10>H6NF5JC4F<3>000<10>c7Xg7_k8b<3>zBo<10>N4JJ4GF3D\
<BR> <3>000<10>cMIgOKkQM<3>zYT<10>NCBJA9F87<3>000<9>bY5f`5jd6<3>zr8<8>yN4xJ3x\
<BR> F3<3>w00tz0000
<BR> }</FONT></HTML>
- --part1_fd.d00644f.28eba28d_alt_boundary--
- --part1_fd.d00644f.28eba28d_boundary
Content-Type: text/plain; name="Rsp.frm"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: inline; filename="Rsp.frm"
Testing{;Rui Parracho
;periodicity off
init:
z=3D0
n=3D0
loop:
n=3Dn+1
z=3Dz*z+#pixel
bailout:
(n/|z|)<=3D 512
default:
title =3D "Testing"
}
Scarlotta{;Rui Parracho
z=3Dc=3Dpixel,
:
rz=3Dfn1(z)=20
z=3Dc*((rz)+sin(rz)),=20
cabs(z)<=3D 512}
Scarlotta2{;Rui Parracho
z=3Dpixel/pi, c=3Dpixel,
:
rz=3Dc/z, z=3D((rz)+sin(rz)),=20
cabs(z)<=3D 512}
Scarlotta3{;Rui Parracho=20
z=3Dpixel/pi, c=3Dpixel,
:
rz=3Dc/z, z=3D((rz)+sin(rz)),=20
cabs(z/( (sqrt(z*z-1) + z) )) > .5}
int700{;Rui Parracho
z=3Dpixel, =20
if (|p1|=3D=3D0), r=3D(-3.6,1.1), else, r=3Dp1, endif
:
oz=3Dz, sz=3Dz-z^3/3+z^5/120, f=3Dz*z*sz,
g=3D2*z*(sz)+z^2*(cos(z)), z=3Dz-r*f/g,
|(z-oz)| > .0000001}
Qubex{;Rui Parracho
IF(|p1|=3D=3D0), a=3D(1,0), ELSE, a=3Dp1, ENDIF
IF(|p2|=3D=3D0), b=3D(1,0), ELSE, b=3Dp2, ENDIF
IF(|p3|=3D=3D0), c=3D(1,0), ELSE, c=3Dp3, ENDIF
d=3Dpixel, ad3=3Da/3, bd2=3Db/2, ta=3D2*a
z=3D(-b+sqrt(b*b-4*a*c))/ta
:
z2=3Dz*z, z3=3Dz2*z,=20
z=3Dad3*z3+bd2*z2+c*z+d,
|z| <=3D 256}
Qubexfix{;Rui Parracho
IF(|p1|=3D=3D0), a=3D(3,0), ELSE, a=3Dp1, ENDIF
IF(|p2|=3D=3D0), b=3D(2,0), ELSE, b=3Dp2, ENDIF
IF(|p3|=3D=3D0), c=3D(1,0), ELSE, c=3Dp3, ENDIF
d=3Dpixel, ad3=3Da/3, bd2=3Db/2, ta=3D2*a
z=3D(-b+sqrt(b*b-4*a*c))/ta
:
z2=3Dz*z, z3=3Dz2*z,
z=3Dad3*z3+bd2*z2+c*z+d,
|z| <=3D 256}
cubicQueues{;Rui Parracho
IF(|p1|=3D=3D0), a=3D(3,0), ELSE, a=3Dp1, ENDIF
IF(|p2|=3D=3D0), b=3D(2,0), ELSE, b=3Dp2, ENDIF
IF(|p3|=3D=3D0), c=3D(1,0), ELSE, c=3Dp3, ENDIF
d=3Dpixel,=20
z=3D1/3*a+1/3*c+1/3*b+1/3*sqrt(a^2-a*c-a*b+c^2-b*c+b^2)
:
z=3D(z-a)*(z-b)*(z-c)+d,
|z| <=3D 256}
Qubexnew{;Rui Parracho
IF(|p1|=3D=3D0), a=3D(1,0), ELSE, a=3Dp1, ENDIF
IF(|p2|=3D=3D0), b=3D(2,0), ELSE, b=3Dp2, ENDIF
IF(|p3|=3D=3D0), c=3Dpixel, ELSE, c=3Dp3, ENDIF
z=3D(-a+sqrt(a*a-3*b))/3
:
z2=3Dz*z, z3=3Dz2*z,
z=3Dz3+a*z2+b*z+c,
|z| <=3D 256}
Regula_falsi{;Rui Parracho
IF(|p1|=3D=3D0), k=3D1, ELSE, k=3Dp1, ENDIF
IF(|p2|=3D=3D0), z=3Dpixel, ELSE, z=3Dp1, ENDIF
x0=3D(1,1), c=3Dx1=3Dpixel
:
oz=3Dz, fx0=3Dx0*x0*x0+3*x0*x0+2*x0+c,
fx1=3Dx1*x1*x1+3*x1*x1+2*x1+c,
z=3Dz-k*(x1-x0)*fx1/(fx1-fx0),
x0=3Dx1, x1=3Dz,
|z-oz| > .0000001}
AutoQuad{;Rui Parracho
if (cabs(p1)=3D=3D0), a=3D4, else, a=3Dp1, endif
if (cabs(p2)=3D=3D0), b=3D3, else, b=3Dp2, endif
if (cabs(p3)=3D=3D0), c=3D2, else, c=3Dp3, endif
d=3Dpixel, z=3D(-b+sqrt(b^2-4*a*c))/a
:
z2=3Dz*z, z3=3Dz*z2, z4=3Dz3*z
z=3D1/4*a*z4+1/3*b*z3+1/2*c*z2+d,
cabs(z)<=3D256}
newcube{;Rui Parracho
if (cabs(p1)=3D=3D0), a=3D1, else, a=3Dp1, endif
if (cabs(p2)=3D=3D0), b=3D1, else, b=3Dp2, endif
if (cabs(p3)=3D=3D0), c=3Dpixel, else, c=3Dp3, endif
a2=3Da*a, b2=3Db*b, c2=3Dc*c,
ab=3Da*b, ac=3Da*c, bc=3Db*c,=20
m=3Da+b+c, n=3Dab+bc+ac, o=3Da*b*c,=20
det=3Dsqrt(a2+b2+c2-10*n),
u=3D(det-2*m)/6,
v=3D(-det-2*m)/6,
if (cabs(u)>cabs(v)),z=3Du, else, z=3Dv, endif
:
oz=3Dz, z2=3Dz*z, z3=3Dz2*z
z=3Dz3+m*z2+n*z+o
cabs(z-oz) >=3D .0000001}
autosquare{;Rui Parracho
if (cabs(p1)=3D=3D0), a=3D1, else, a=3Dp1, endif
if (cabs(p2)=3D=3D0), b=3D1, else, b=3Dp2, endif
c=3Dpixel,=20
if (cabs(p3)=3D=3D0), r=3Dp1, else, r=3Dp3, endif
g=3Dz=3D(-b)/(2*a)
:
f=3Da*z*z+b*z+c
z=3Dz-r*f/g
cabs(z) > .00000000128}
marmelo{;Rui Parracho
IF(|p1|=3D=3D0), r=3Dpixel, ELSE, r=3Dp1, ENDIF
IF(|p2|=3D=3D0), x0=3D(-1,1), ELSE, x0=3Dp2, ENDIF
IF(|p3|=3D=3D0), a=3Dreal(pixel), b=3Dimag(pixel),=20
ELSE, a=3Dreal(p3), b=3Dimag(p3), ENDIF
z=3Dx1=3Dpixel,=20
amb=3Da-b, apb=3Da+b, tamb=3D2*amb, tapb=3D2*apb
:
fx0=3Dsin(amb*x0)/tamb-sin(x0*apb)/tapb+pixel,
fx1=3Dsin(a*x1)*sin(b*x1), oz=3Dz
z=3Dz-r*(x1-x0)*fx1/(fx1-fx0),
x2=3Dz, x0=3Dx1, x1=3Dx2
|z-oz|>=3D.0000001}
muitomas {;Rui Parracho
IF(|p1|=3D=3D0), r=3D1, ELSE, r=3Dp1, ENDIF ;relaxation
IF(|p2|=3D=3D0), a=3Dfn1(pixel), ELSE, a=3Dp2, ENDIF=20
IF(|p3|=3D=3D0), b=3Dfn2(pixel), ELSE, b=3Dp2, ENDIF=20
c=3Dfn3(pixel), z=3Dpixel, bail=3D0
p=3D9*a*c-3*b*b, q=3D2*b*b*b-9*a*b*c+27*a*a*pixel
:
fz0=3D a*z*z*z+b*z*z+c*z+pixel,
gz0=3D 3*z*z+2*b*z+c, fz1=3D z*z*z+p*z+q,
gz1=3D 3*z*z+p, u=3Dz-r*fz0/gz0, v=3Dz-r*fz1/gz1
if(cabs(u)<=3Dcabs(v)), z=3Dv, else, z=3Du, endif
if((cabs(fz0)<=3D.00000001) || (cabs(fz1)<=3D.00000001)), bail=3D1, else, ba=
il=3D0, endif
bail<1}
muitominos {;Rui Parracho
IF(|p1|=3D=3D0), r=3D1, ELSE, r=3Dp1, ENDIF ;relaxation
IF(|p2|=3D=3D0), a=3Dfn1(pixel), ELSE, a=3Dp2, ENDIF=20
IF(|p3|=3D=3D0), b=3Dfn2(pixel), ELSE, b=3Dp2, ENDIF=20
c=3Dfn3(pixel), z=3Dpixel, bail=3D0, p=3D9*a*c-3*b*b,=20
q=3D2*b*b*b-9*a*b*c+27*a*a
:
fz0=3D a*z*z*z+b*z*z+c*z+pixel,
gz0=3D 3*z*z+2*b*z+c, fz1=3D z*z*z+p*z+q
gz1=3D 3*z*z+p, u=3Dz-r*fz0/gz0, v=3Dz-r*fz1/gz1
if(cabs(u)<=3Dcabs(v)), z=3Du, else, z=3Dv, endif
if (cabs(u-z)<=3D.00000001), bail=3D1, else, bail=3D0, endif
if (cabs(v-z)<=3D.00000001), bail=3D1, else, bail=3D0, endif
bail<1}
outravez {;Rui Parracho
IF(|p1|=3D=3D0), r=3D1, ELSE, r=3Dp1, ENDIF ;relaxation
IF(|p2|=3D=3D0), a=3D3, ELSE, a=3Dp2, ENDIF=20
IF(|p3|=3D=3D0), b=3D7, ELSE, b=3Dp3, ENDIF=20
c=3Dpixel, bail=3D0,=20
z=3D(sqrt(4*b*b-12*a*c)-2*b)/6/a,
:
oz=3Dz, fz=3D a*z*z*z+b*z*z+c*z+pixel,
gz=3D 3*z*z+b, z=3Dz-r*fz/gz
if(cabs(z-oz) < .0000001), bail=3D1, else, bail=3D0, endif
bail<1}
ultravez {;Rui Parracho
IF(|p1|=3D=3D0), r=3D1, ELSE, r=3Dp1, ENDIF ;relaxation
IF(|p2|=3D=3D0), a=3Dfn1(pixel), ELSE, a=3Dp2, ENDIF=20
IF(|p3|=3D=3D0), b=3Dfn2(pixel), ELSE, b=3Dp3, ENDIF=20
c=3Dfn3(pixel), z=3D(sqrt(4*b*b-12*a*c)-2*b)/6/a,
bail=3D0, p=3D9*a*c-3*b*b
:
z0=3Dz, fz0=3D a*z*z*z+b*z*z+c*z+pixel,
gz1=3D 3*z*z+p, z=3Dz0-r*fz0/gz1
if(cabs(z-z0) < .0001), bail=3D1, else, bail=3D0, endif
bail<1}
volvox{;Rui Parracho
z=3Dc=3Dpixel, x=3Dy=3D0,
IF(|p1|=3D=3D0), d=3D1, ELSE, d=3Dp1, ENDIF
:
z=3Dz*z+c, x=3Dreal(z),y=3Dimag(z)
cabs(2*x*x+5*y*y-8*x+10*y+3) <=3D d*cabs(x*x-7*y*y+6*x+28*y-33)}
valoil{;Rui Parracho
IF(|p1|=3D=3D0), z=3Dpixel, ELSE, z=3Dp1, Endif
c=3Dpixel=20
:
z=3Dc*((z-1/z)*log(z)-z+log(2*pi)/2)
|z|<=3D 1256}
maisominos {;Rui Parracho
IF(|p1|=3D=3D0), r=3D1, ELSE, r=3Dp1, ENDIF ;relaxation
IF(|p2|=3D=3D0), a=3Dfn1(pixel), ELSE, a=3Dp2, ENDIF=20
IF(|p3|=3D=3D0), b=3Dfn2(pixel), ELSE, b=3Dp3, ENDIF=20
c=3Dfn3(pixel), z=3Dpixel, bail=3D0
:
fz0=3D z*z*z+a*z*z+b*z+c,
gz0=3D 3*z*z+2*a*z+b*fn4(z)
z=3Dz-r*fz0/gz0
if( (cabs(fz0)<=3D.00000001) ), bail=3D1, else, bail=3D0, endif
bail<1}
Beliza {;Rui Parracho
IF(|p1|=3D=3D0), c=3Dpixel, ELSE, c=3Dp1, ENDIF =20
IF(|p2|=3D=3D0), z=3Dpixel, ELSE, z=3Dp2, ENDIF
bail=3D0, a=3Dc*5/8, ta=3D2*a, b=3Dc*35/16, fb=3D4*b
:
z=3D a*sin(2*z)+b*sin(4*z),
if( (cabs(z)>256) ), bail=3D1, else, bail=3D0, endif
bail<1}
int08{;Rui Parracho
z=3Dpixel
IF(|p1|=3D=3D0), r=3D1.7, ELSE, r=3Dp1, ENDIF =20
:
oz=3Dz, z2=3Dz*z, z3=3Dz2*z, f=3Dlog(z3),
g=3D3*z2/(z3), z=3Dz-r*f/g
cabs(z-oz) > .00000001}
int269{;Rui Parracho
z=3Dpixel,
if (cabs(p1)=3D=3D0), k=3D2.9, else, k=3D(p1), endif
:
oz=3Dz, f=3D.5*(sin(z))^2,=20
g=3Dsin(z)*cos(z),
z=3Dz-k*f/g
cabs(z-oz)> .00000001}
int253{;Rui Parracho
z=3Dpixel,=20
if (cabs(p1)=3D=3D0), r=3D1, else, r=3D(p1), endif
:
oz=3Dz
f=3D.125*z-.25*sin(2*z)+.03125*sin(4*z)
sz=3Dsin(z), g=3Dsz*sz*sz*sz, z=3Dz-r*f/g
cabs(z-oz)> .00000001}
int252{;Rui Parracho=20
z=3Dpixel,oz=3D0=20
if (cabs(p1)=3D=3D0), t=3D1, else, t=3D(p1), endif
if (cabs(p2)=3D=3D0), r=3D3, else, r=3D(p2), endif
if (cabs(p3)=3D=3D0), s=3D5, else, s=3D(p1), endif
rms=3Dr-s, rps=3Dr+s, trms=3D2*rms, trps=3D2*rps
:
oz=3Dz
f=3Dsin(rms*z)/trms-sin(rps*z)/trps,
g=3Dsin(r*z)*sin(s*z), z=3Dz-t*f/g,
cabs(z-oz) > .00000001}
int304{;Rui Parracho
z=3Dc=3Dpixel,=20
if (cabs(p1)=3D=3D0), k=3D1, else, k=3D(p1), endif
:
oz=3Dz, z2=3Dz*z, z3=3Dz2*z
f=3D(3*z2-6)*cos(z)+(z3-6*z)*sin(z)+c
g=3Dz3*cos(z), z=3Dz-k*f/g,
cabs(z-oz) > .00000001}
int303{;Rui Parracho
z=3Dc=3Dpixel
if (cabs(p1)=3D=3D0), k=3D1, else, k=3D(p1), endif
:
oz=3Dz, z2=3Dz*z
f=3D2*z*cos(z)+(z2-2)*sin(z)+c,
g=3Dz2*cos(z), z=3Dz-k*f/g
cabs(z-oz) > .00000001}
int273{;Rui Parracho
z=3Dpixel
if (cabs(p1)=3D=3D0), k=3D1, else, k=3D(p1), endif
if (cabs(p2)=3D=3D0), m=3D.75, else, m=3D(p2), endif
mp1=3Dm+1
:
oz=3Dz, f=3D(sin(z))^mp1/(mp1)
g=3Dcos(z)*(sin(z))^m, z=3Dz-k*f/g
cabs(z-oz) > .00000001}
rsp_0300w1{;Rui Parracho
if (cabs(p2)=3D=3D0), c=3Dpixel, else, c=3Dp2, endif
tc=3D2*c, c2=3Dc*c, tc3=3D2*c*c2, ttc=3D2*tc
if (|p1|=3D=3D0), r1=3D1.5, else, r1=3Dp1, endif,
if (|p2|=3D=3D0), r2=3D1.05, else, r2=3Dp2, endif,
if (whitesq), r=3Dr1, else, r=3Dr2, endif
z=3Dpixel, oz=3D0
:
z2=3Dz*z, z3=3Dz*z2, fz=3Dz3-c2*z-tc*z2-tc3,
gz=3D3*z2-c2-ttc*z, oz=3Dz, z=3Dz-r*fz/gz,
cabs(oz-z) > .0000001}
rsp_0300w2{;Rui Parracho
if (cabs(p1)=3D=3D0), c=3Dpixel, else, c=3Dp1, endif
if (cabs(p2)=3D=3D0),r1=3D(1,0), else, r1=3Dp2, endif
if (cabs(p3)=3D=3D0),r2=3D(1.1,0), else, r2=3Dp3, endif
tc=3D2*c, c2=3Dc*c, tc3=3D2*c*c2, ttc=3D2*tc
if (whitesq), r=3Dr1, else, r=3Dr2, endif
z=3Dpixel
:
z2=3Dz*z, z3=3Dz*z2, fz=3Dz3+c2*z+tc*z2+tc3,=20
gz=3D3*z2+c2/z+ttc*z, z=3Dz-r*fz/gz,=20
cabs(fz) > .00000001}
rsp_0300w3{;Rui Parracho Julias of newton
if (cabs(p1)=3D=3D0), c=3Dpixel, else, c=3Dp1, endif
if (cabs(p2)=3D=3D0), r=3D(1.0,0.0), else, r=3Dp2, endif
z=3Dpixel
:
z2=3Dz*z, z3=3Dz*z2, fz=3Dz3+z+c,
gz=3D3*z2, z=3Dz-r*fz/gz,
cabs(fz) > .000000001 }
rsp_0400w1{;Rui Parracho
if (cabs(p1)=3D=3D0), r=3D1, else, r=3Dp1, endif
c=3Dpixel
if (cabs(p2)=3D=3D0), a=3D(1.0,1.0), else, a=3Dp2, endif
if (cabs(p3)=3D=3D0), b=3D(-1.0,-1.0), else, b=3Dp3, endif
f=3Da+b+c, g=3Da*b+b*c+c*a, h=3Da*b*c
z=3Dpixel;r*(c*c*c+f*c*c+g*c+h)/(3*c*c+2*f*c+g)
:
z2=3Dz*z, z3=3Dz*z2, fz=3Dz3+f*z2+g*z+h,
gz=3D3*z2+2*f*z+g, z=3D(z-r*fz/gz)*(z-r*fz/gz)+c,
cabs(fz)/.0000001 > 1 }
rsp04w01{;Rui Parracho=20
c=3Dpixel
if (cabs(p1)=3D=3D0), r=3D1, else, r=3Dp1, endif
if (cabs(p2)=3D=3D0), z=3D(1.0,1.0), else, z=3Dp2, endif
if (real(p3)=3D=3D0), m=3D(4.0,1.0), else, m=3Dreal(p2), endif
m=3Dp2, mp1=3Dm+1, imp1=3D1/mp1
:
f=3Dimp1*sin(z)^mp1, g=3Dcos(z)*(sin(z))^m
rfg=3Dr*f/g, z2=3Dz*z, z=3Dsqr(z-rfg)+c
cabs(f) > .00000001}
rsp04w03{;Rui Parracho=20
;periodicity off
if (cabs(p1)=3D=3D0), r=3D1, else, r=3Dp1, endif
if (cabs(p2)=3D=3D0), z=3Dpi/2, else, z=3Dp2, endif
c=3Dpixel,
:
z2=3Dz*z, f=3Dz2*(z2*(z2+1)+1)+c,
g=3D2*z*(z2*(3*z2)+1), z=3Dz-r*f/g
cabs(f) > .00000001}
rsp_04w5{;Rui Parracho=20
c=3Dpixel
if (cabs(p2)=3D=3D0), a=3D(1.0,1.0), else, a=3Dp2, endif
if (cabs(p3)=3D=3D0), b=3D(-1.0,-1.0), else, b=3Dp3, endif
f=3Da+b+c, g=3Da*b+b*c+c*a, h=3Da*b*c, z=3D-c/g
:
z2=3Dz*z, z3=3Dz2*z, ot=3Dt
t=3D3*z2+2*f*z+g, z=3D-(h+f*z2+z3)/g,
|t-ot|>.000001 }
rsp_04w6{;Rui Parracho
c=3Dpixel
if (cabs(p2)=3D=3D0), a=3D(1.0,1.0), else, a=3Dp2, endif
if (cabs(p3)=3D=3D0), b=3D(-1.0,-1.0), else, b=3Dp3, endif
f=3Da+b+c, g=3Da*b+b*c+c*a, h=3Da*b*c, z=3Dc/h
:
z2=3Dz*z, z3=3Dz2*z, z=3D-(h+f*z2+z3)/g,
|z| < 256 }
algria{;Rui Parracho
;makes little circlws kind of dull
z=3Dc=3Dpixel
:
z2=3Dz*z, z3=3Dz*z*z, z=3Dz3+z2+z+c,
t=3Dreal(2-(2*z+1)/(3*z2+2*z+1))
1+t >=3D p1 }
algrib{;Rui Parracho
z=3Dc=3Dpixel
r=3Dcabs(z)
:
oz=3Dz, z2=3Dz*z, z3=3Dz*z2
f=3Dz3+z2+z+c, g=3D3*z2+2*z+1,
h=3D6*z+2, z=3Dz-f/(g)-p1*(g/(h))
|z-oz| > .0000001}
Regula_falsi2{;Rui Parracho
IF(|p1|=3D=3D0), r=3D1.65, ELSE, r=3Dp1, ENDIF
IF(|p2|=3D=3D0), z=3Dpixel, ELSE, z=3Dp2, ENDIF
x0=3D(1,1), x1=3Dpixel, oz=3D0
:
fx0=3Dx0*x0+pixel, fx1=3Dx1*x1+pixel,
oz=3Dz, z=3Dz-r*(x1-x0)*fx1/(fx1-fx0),
x0=3Dx1, x1=3Dz
cabs(z-oz) > .0000001}
Regula_falsi3 {;Rui Parracho
IF(|p1|=3D=3D0), r=3D1.65, ELSE, r=3Dp1, ENDIF
IF(|p2|=3D=3D0), z=3Dpixel, ELSE, z=3Dp2, ENDIF
IF(real(p3)=3D=3D0), a=3D5, ELSE, a=3Dreal(p3), ENDIF
IF(imag(p3)=3D=3D0), b=3D3, ELSE, b=3Dimag(p3), ENDIF
x0=3D(-1,1), x1=3Dpixel
amb=3Da-b, apb=3Da+b, damb=3Damb*2, dapb=3Dapb*2
:
fx0=3Dsin(amb*x)/damb-sin(x0*apb)/dapb+pixel,
fx1=3Dsin(a*x1)*sin(b*x1), oz=3Dz,
z=3Dz-r*(x1-x0)*fx1/(fx1-fx0),
x0=3Dx1, x1=3Dz
|z-oz|>.0000001}
Newt_01 {;Rui Parracho
z=3Dpixel,
if (cabs(p1)=3D=3D0), k=3D1, else, k=3D(p1), endif
if (real(p2)=3D=3D0), a=3D4, else, a=3Dreal(p2), endif
if (imag(p2)=3D=3D0), b=3D3, else, b=3Dimag(p2), endif
amb=3Da-b, apb=3Da+b, damb=3Damb*2, dapb=3Dapb*2
:
f=3Dsin(amb*z)/damb-sin(z*apb)/dapb,
g=3Dsin(a*z)*sin(b*z),
oz=3Dz, z=3Dz-k*f/g,
|z-oz|>=3D.0000001}
Newt_02 {;Rui Parracho
z=3Dpixel,
if (cabs(p1)=3D=3D0), k=3D1, else, k=3D(p1), endif
if (real(p2)=3D=3D0), a=3D4, else, a=3Dreal(p2), endif
if (imag(p2)=3D=3D0), b=3D3, else, b=3Dimag(p2), endif
amb=3Da-b, apb=3Da+b, damb=3Damb*2, dapb=3Dapb*2
:
f=3Dsin(amb*z)/damb-sin(z*apb)/dapb+pixel,
sinaz=3Dsin(a*z), sinbz=3Dsin(b*z)
g=3Dsinaz*sinbz,
h=3Db*sinaz*cos(b*z)+a*sinbz*cos(a*z)
oz=3Dz, z=3Dz-k*(g/h+((g/h)^2-2*f/h)),
|z-oz|>0.0000001}
rsp_halley001 {;Rui Parracho
z=3Dc=3Dpixel, d=3D3*pixel, z2=3Dz3=3Df=3Dg=3Dh=3Doz=3D0
if (cabs(p1)=3D=3D0), k=3D1, else, k=3D(p1), endif
:
z2=3Dz*z, z3=3Dz*z2+c, f=3Dz3*(c+z2)
g=3Dz2*(d+5*z2), h=3D2*z*(d+10*z2)
oz=3Dz, z=3Dz-k*f/(g+.5*h*(z-oz))
(|z-oz|)> 0.0000001}
rsp_halley002 {;Rui Parracho
z=3D10000*exp(|pixel|)
c=3Dpixel, d=3D3*pixel, oz=3D0,
if (cabs(p1)=3D=3D0), r=3D1.5, else, r=3D(p1), endif
:
z2=3Dz*z, z3=3Dz*z2, f=3Dz3*(c+z2)+c
g=3Dz2*(d+5*z2), h=3D2*z*(d+10*z2)
oz=3Dz, z=3Dz-r*2*f*g/(2*g*g-f*h)
|oz-z|>0.000000001}
rsp_ruif1{;Rui Parracho
z=3D100*pixel,d=3D3*pixel
c=3Dpixel,p=3D6*c, q=3D11*c*c, r=3Dp*c*c, s=3D2*p,=20
if (cabs(p1)=3D=3D0), w=3D1.5, else, w=3D(p1), endif
:
z2=3Dz*z, z3=3Dz*z2, f=3Dz3+p*z2+q*z+r+d
g=3D3*z2+s*z+q, h=3D6*z+s, oz=3Dz
z=3Dz-w*2*f*g/(2*g*g-f*h)
|oz-z|>0.0000001}
rsp_ruif2{;Rui Parracho
z=3D0, c=3Dpixel, m=3D6*c, n=3D11*c*c, o=3Dm*c*c,=20
p=3D2*m, d=3D3*pixel, oz=3D0
if (cabs(p1)=3D=3D0), r=3D1.5, else, r=3D(p1), endif
:
oz=3Dz, z2=3Dz*z, z3=3Dz*z2, f=3Dz3+m*z2+n*z+o+d
g=3D3*z2+p*z+n, z=3Dz-r*f/g
|z-oz|>0.0000001}
rsp_0300h2{;Rui Parracho
z=3D100000*pixel, c=3Dpixel,p=3D6*c,=20
q=3D11*c*c, r=3Dp*c*c, s=3D2*p,=20
if (cabs(p1)=3D=3D0), r=3D1, else, r=3D(p1), endif
:
z2=3Dz*z, z3=3Dz*z2
f=3Dz3+p*z2+q*z+r/z
g=3D3*z2+s*z+q
oz=3Dz, z=3Dz-r*f/g
|oz-z|>0.0000001}
rsp_0300h3{;Rui Parracho
z=3D10000*pixel, c=3Dpixel,p=3D6*c,=20
q=3D11*c*c, r=3Dp*c*c, s=3D2*p,=20
if (cabs(p1)=3D=3D0), r=3D(.5375,-0.7875), else, r=3D(p1), endif
if (cabs(p2)=3D=3D0), s=3D(.3375,-0.10625), else, s=3D(p2), endif
:
z2=3Dz*z, z3=3Dz*z2
f=3Dz3+p*z2+q*z+r/z
g=3D3*z2+s*z+q, h=3D6*z+s
oz=3Dz, z=3Dz-r*f/g-s*g/h
|z-oz|>0.0000001}
rsp_regfal1{;Rui Parracho
z=3Dw=3Dc=3Da=3Dpixel, n=3Dcabs(pixel)
b=3Dfb=3D0, fa=3Da*a*a+a*a+a
tv=3D.00000001
:
z=3Dz-(a*fb-b*fa)/(fb-fa)
w=3Dw*w*w+w*w+c, test=3Dreal(fa)*real(w)
if(test<tv), b=3Dz,fb=3Dw,fa=3Dfa/n, else, a=3Dz, fa=3Dw, fb=3Dfb/n, endif
|(z)|>.0000001 }
rsp_0300h4{;Rui Parracho
z=3Dflip(pixel),
if (cabs(p1)=3D=3D0), r=3D(2.0,0.07), else, r=3D(p1), endif
:
fz=3Dz/(1+z*z),
gz=3D(1-z*z)/(1+z*z)^2
z=3Dz-r*fz/gz
cabs(gz)>.000000001 }
rsp_0300h5{;Rui Parracho
z=3Dc=3Dpixel
if (|p1|=3D=3D0), r=3D(2.0,0.2), else, r=3Dp1, endif,
:
fz=3Dz/(c+z*z),
gz=3D(c-z*z)/(c+z*z)^2
z=3Dz-r*fz/gz
cabs(fz)>.000001}
rsp_0400h1{;Rui Parracho
z=3Dc=3Dpixel
:
x=3Dreal(z), x2=3Dx*x,x3=3Dx2*x
y=3Dflip(imag(z)), y2=3Dy*y, y3=3Dy2*y
z=3Dx*(x3+3*x2*y+3*x*y2+y^3)+c
|z|<256}
=20
rsp_04w4h1{;Rui Parracho
if (cabs(p1)=3D=3D0), c=3Dpixel, else, c=3Dp1, endif
z=3Dpixel
:
z2=3Dz*z, z3=3Dz2*z,
dz=3Dz*cos(z)+sin(z)+3*z2, =20
z=3D-z3/sin(c*z),
cabs(dz) > .000000001 }
rsp_04w4h2{;Rui Parracho
if (cabs(p1)=3D=3D0), c=3Dpixel, else, c=3Dp1, endif
if (cabs(p2)=3D=3D0), z=3Dpixel, else, z=3Dp2, endif
t=3D0
:
z2=3Dz*z+c, z3=3Dz2*z, ot=3Dt
t=3D6-4*z-20*z3, z=3Dc-1/(6-2*z-5*z3),
|t-ot| > .000000001}
rsp_05h01{;rui parracho =20
if (cabs(p1)=3D=3D0), p=3Dpixel, else, p=3Dp1, endif
if (cabs(p2)=3D=3D0), a=3Dpixel, else, a=3Dp2, endif
if (cabs(p3)=3D=3D0), b=3Dpixel, else, b=3Dp3, endif
ps=3Dp*p, a2=3Da*a, b2=3Db*b, z=3Dc=3Dpixel
:
oz=3Dz, x=3Dreal(z), y=3Dimag(z),
uz=3Dx*y*ps+(x*x-y*y-b2)*p-x*y
vz=3D(x*x-a2)*ps-2*x*y*p-x*x
z=3D(uz+flip(vz))-c
|z-oz|>.000000064 }
rsp_05h02{;rui parracho=20
c=3Dpixel
if (cabs(p1)=3D=3D0), a=3Dpixel, else, a=3Dp1, endif
if (cabs(p2)=3D=3D0), b=3Dpixel, else, b=3Dp2, endif
k=3Da+b+c, l=3Da*b+a*c+b*c, m=3Da*b*c
z=3D(sqrt(k*k-12*l)-k)/6
:
oz=3Dz, z2=3Dz*z, z=3Dz*c+(k+l/z+m/z2)
|z|<=3D1280 }
rsp_05h03{;Rui Parracho
if (cabs(p1)=3D=3D0), z=3D-.5993, else, z=3Dp1*pixel, endif
if (cabs(p2)=3D=3D0), c=3Dpixel, else, c=3Dp2, endif
:
z2=3Dz*z, z3=3Dz2*z, z=3D-z3/sin(c*z),
dz=3Dz*cos(z)+sin(z)+3*z*z, =20
cabs(dz) > .000000001 }
rsp_05h04{;Rui Parracho=20
z=3Dc=3Dpixel, oz=3Dbail=3D0
if (cabs(p1)=3D=3D0), n=3D1.01, else, n=3Dp1, endif
:
oz=3Dz, z=3Dz*z+c
if( cabs(z-oz)>.00001 ), c=3Dc*n, else, c=3Dc/n, endif
if( cabs(z-oz) < .0000001 ), bail=3D1, endif
if( cabs(z)>=3D64), bail=3D1, endif
bail=3D=3D0 }
rsp_05h05{;Rui Parracho
z=3Dw=3Dv=3Dpixel
if (cabs(p2)=3D=3D0), u=3Dpixel, else, u=3Dp2, endif
if (cabs(p1)=3D=3D0), y=3D1.2, else, y=3D(p1), endif,
k=3Du+v+w, l=3Du*v+u*w+v*w,
fz=3D(sqrt(k*k-12*l)-k)/6
sz=3Dfz*fz*fz+u*fz*fz+v*fz+w
tz=3Dsz*sz*sz+u*sz*sz+v*sz+w
:
q=3D(tz-sz)/cabs(sz-fz),=20
q2=3Dq*q, a=3Dq*tz+(q+q2)*sz+q2*fz
b=3D(2*q+1)*tz+(1+2*q+q2)*sz+q2*fz
c=3D(q+1)*sz, oz=3Dz,
detm=3Dy*(b-sqrt(b*b-4*a*c)),
detp=3Dy*(b+sqrt(b*b+4*a*c)),
if(cabs(detp)>cabs(detm)), r=3Ddetm, else, r=3Ddetp, endif
z=3Dz-(tz-sz)*2*c/r, fz=3Dsz, sz=3Dtz,=20
tz=3Dtz*tz*tz+u*tz*tz+v*tz+w
|z-oz|> .000000001 }
Autocube{;rui parracho
if (cabs(p1)=3D=3D0), m=3D3*pixel, else, m=3Dp1, endif
if (cabs(p2)=3D=3D0), n=3D2*pixel, else, n=3Dp1, endif
p=3Dpixel, a=3Dm+n+p, b=3Dm*n+p*m+p*n, c=3Dm*n*p
r1=3D(a+sqrt(m*m+n*n+p*p-b))/3
r2=3D(a-sqrt(m*m+n*n+p*p-b))/3
if (cabs(r1) < cabs(r2)), z=3Dr1, else, z=3Dr2, endif
:
z2=3Dz*z, z3=3Dz*z2, z=3Dz3+a*z2+b*z+c
cabs(z)<=3D256 }
rsp_0711h1{
if (cabs(p1)=3D=3D0), n=3D8, else, n=3D(round(cabs(p1))), endif ;points on s=
tar
nm1=3Dn-1, nm2=3Dn-2, a=3Dn*nm1,=20
if (cabs(p2)=3D=3D0), c=3Dpixel, else, c=3Dp2, endif ;slices with high p1
if (cabs(p3)=3D=3D0), r=3D1.5, else, r=3Dp3, endif ; looked good with 1.0
z=3Dpixel, oz=3Df=3Df1=3Df2=3D0
:
oz=3Dz, f=3Dz^n-z-c, f1=3Dn*z^nm1-1, f2=3Da*z^nm2
z=3Dz-r*(2*f/f1)/(1+sqrt(1-2*f*f2/f1/f1))
CABS(z-oz)>.0000001 }
Schwartian{;Rui Parracho
z=3Dc=3Dpixel
if (cabs(p1)=3D=3D0), r=3D1, else, r=3D(p1), endif
if (cabs(p2)=3D=3D0), k=3D1, else, k=3D(p2), endif
if (cabs(p3)=3D=3D0), test=3D4, else, test=3D(p3), endif
:
f=3Dz*z*z+fn1(z),=20
g=3D3*z*z+fn2(z), h=3D6*z+c
z=3Dz-r*(k/g-3*h*h/2/g/g)/f
cabs(z)< test }
Weier{;Rui Parracho
if (cabs(p1)=3D=3D0), k=3D1, else, k=3D(p1), endif
z=3Dc=3Dpixel
:
z=3Dz*z+c
Sin(z*flip(1))/(Exp(2*z+1))<=3Dk }
Weiers{;Rui Parracho
z=3Dc=3Dpixel
:
fz=3Dfn1(2*z), z=3D1-fn1(z*z+c)
cabs(fz/(1+z)) > cabs(fz)/c }
Cubix{;Rui Parracho
d=3Dpixel
if (cabs(p1)=3D=3D0), a=3D(1,2), else, a=3Dp1, endif
if (cabs(p2)=3D=3D0), b=3D(3,1), else, b=3Dp2, endif
if (cabs(p3)=3D=3D0), c=3D(1,-1), else, c=3Dp3, endif
zp=3D(sqrt(b*b-3*a*c)-b)/3/a
;zn=3D(sqrt(-b*b-3*a*c)-b)/3/a
;if (cabs(zp) < cabs(zn)), z=3Dzn, else, z=3Dzp, endif
z=3Dzp
:
z2=3Dz*z, z3=3Dz*z2
z=3Da*z3+b*z2+c*z+d
cabs(z)<=3D256 }
Cubix1{;Rui Parracho
if (cabs(p1)=3D=3D0), a=3D(1,2), else, a=3Dp1, endif
if (cabs(p2)=3D=3D0), b=3D(3,1), else, b=3Dp2, endif
c=3Dpixel
sumc=3Da+b+c, sumcs=3Da*a+b*b+c*c, sump=3Da*b+a*c+b*c
zp=3D(-sumc+sqrt(sumcs-sump))/3
zn=3D(-sumc-sqrt(sumcs-sump))/3
If (cabs(zp) < cabs(zn)), z=3Dzp, else, z=3Dzn, endif
:
z=3D(z+a)*(z+b)*(z+c)
cabs(z)<=3D256
}
- --part1_fd.d00644f.28eba28d_boundary--
- --------------------------------------------------------------
Thanks for using Fractint, The Fractals and Fractint Discussion List
Post Message: fractint@lists.xmission.com
Get Commands: majordomo@lists.xmission.com "help"
Administrator: twegner@fractint.org
Unsubscribe: majordomo@lists.xmission.com "unsubscribe fractint"
------------------------------
End of fractint-digest V1 #602
******************************