20160812Newton {
;
; Standard Newton fractal.
;
init:
z = pixel
loop:
zold = z
z =z-((z^2+@c)^13+1)/(13*(z^2+@c)^12)
bailout:
|z - zold| >= @bailout
default:
title = "Newton"
helpfile = "Uf*.chm"
helptopic = "Html\formulas\standard\newton.html"
$IFDEF VER50
rating = recommended
$ENDIF
maxiter = 100
param c
caption = "c"
default = (8.319999991,3.086666667)
hint = "Specifies the root of the equation that is solved. Use larger \
numbers for slower convergence."
endparam
param bailout
caption = "Bailout value"
default = 0.00001
min = 0
$IFDEF VER40
exponential = true
$ENDIF
hint = "This parameter defines how soon a convergent orbit bails out while \
iterating. Smaller values give more precise results but usually \
require more iterations."
endparam
} |
