News: Visit the official fractalforums.com Youtube Channel
 Welcome, Guest. Please login or register. May 18, 2022, 04:26:27 AM 1 Hour 1 Day 1 Week 1 Month Forever Login with username, password and session length

## The All New FractalForums is now in Public Beta Testing! Visit FractalForums.org and check it out!

Formula 21
Previous Image | Next Image
Description: Formula in Gestaltlupe:

int gr=20;

/// <summary>
/// Initialisierung
/// </summary>
public override void Init() {
base.Init();
// Hier kann z.B. pow oder gr aus den Einstellungen gelesen werden.
}

public override long InSet(double ar, double ai, double aj, double br, double bi, double bj, double bk, long zkl, bool invers) {

double aar, aai, ai_alt, aj_alt, aaj, aak, cj, ck, ari, arj, ark, aik, aij, ajk, ak_alt;
double c, d;
long tw;
int n;

aar = ar * ar; aai = ai * ai; aaj = aj * aj; tw = 0L;
d = aar + aai + aaj;
for (n = 1; n < zkl; n++) {
ai = 2 * ai * ar * aj + d * bi;
aj = aaj - (aai + aar) / 2.0 + d * bj;
ar = aar - (aai + aaj) / 2.0 + d * br;
aar = ar * ar; aai = ai * ai; aaj = aj * aj;
d = aar + aai + aaj;
if ((d) > gr) { tw = n; break; }
}
return (tw);

}

Stats:
Total Favorities: 0 View Who Favorited
Filesize: 115.72kB
Height: 960 Width: 1280
Keywords: Fractal
Posted by: trafassel January 10, 2010, 10:03:41 PM

Rating: by 1 members.