Finish julia

This commit is contained in:
joachimschmidt557 2019-02-09 22:11:26 +01:00
parent a0b4e19007
commit 8cc11ea130
6 changed files with 3 additions and 3 deletions

View file

@ -8,15 +8,15 @@ let generatePixel x y height width zoom rMax maxIter =
let c = MandelBrot.getComplexValueForPixel (float x) (float y) (float height) (float width) zoom let c = MandelBrot.getComplexValueForPixel (float x) (float y) (float height) (float width) zoom
let z = Complex(-0.8, 0.156) let z = Complex(-0.8, 0.156)
let rec findI i z = let rec findI i c =
if i >= maxIter then i if i >= maxIter then i
else if Complex.Abs(z) >= (float rMax) then i else if Complex.Abs(c) >= (float rMax) then i
else else
let newRe = c.Real*c.Real - c.Imaginary*c.Imaginary let newRe = c.Real*c.Real - c.Imaginary*c.Imaginary
let newIm = 2.0 * c.Real * c.Imaginary let newIm = 2.0 * c.Real * c.Imaginary
findI (i+1) (Complex(newRe, newIm)+z) findI (i+1) (Complex(newRe, newIm)+z)
MandelBrot.colorMap (findI 0 (Complex(0.0, 0.0))) maxIter MandelBrot.colorMap (findI 0 c) maxIter
let generate (width:int) height zoom rMax maxIter = let generate (width:int) height zoom rMax maxIter =
let result = new Bitmap(width, height) let result = new Bitmap(width, height)

BIN
julia.bmp

Binary file not shown.

Before

Width:  |  Height:  |  Size: 63 KiB

After

Width:  |  Height:  |  Size: 101 KiB

Before After
Before After