nest {
fractal:
  title="nest" width=320 height=240 numlayers=1
layer:
  caption="Layer 1" visible=yes alpha=no
mapping:
  center=0.377968199689980102/-0.278357643059112822
  magn=0.810584245970187083 angle=43.9135485988570598
formula:
  filename="zg.frm" entry="nest" maxiter=100 percheck=normal
inside:
  filename="Fractint.ucl" entry="inside" transfer=linear repeat=yes
  p_inside="nnn" p_n=1 p_logmap=0 p_smooth=yes p_tolerance=1
outside:
  filename="Fractint.ucl" entry="outside" transfer=linear repeat=yes
  p_outside="iter" p_n=1 p_logmap=0 p_biomorph=-1 p_bailout=100
  p_smooth=yes
gradient:
  smooth=yes numnodes=4 index=21 color=7530975 index=95 color=3216007
  index=241 color=12774594 index=308 color=1947015
}

zg.frm:nest {; Giuseppe Zito
 z = pixel ,

c2 = -0.39160001

c4 = -0.030243

c7 = -0.49485701

c11 = -0.59975803

c13 = 0.21419001

d0 = -2.75003386

d8 = -0.15986601

d10 = 0.215734

d13 = 0.053922

d14 = 0.437287

  : 
 x = real(z), y = imag(z)

s0 = x

s0 = s0 -x

s0 = s0 /c2

s0 = s0 /y

s0 = s0 +c4

s0 = s0 -x

s0 = s0 /x

s0 = s0 -c7

s0 = s0 -x

s0 = s0 *c11

s0 = s0 +c13

s0 = s0 +y

s0 = s0 -x

newx = s0 

s0 =d0

s0 = s0 -y

s0 = s0 -x

s1 = x

s1 = s1 +y

s1 = s1 *x

s1 = s1 +d8

s0 = s0 *s1

s0 = s0 *d10

s0 = s0 +y

s1 =d13

s1 = s1 *d14

s0 = s0 *s1

s0 = s0 -x

newy = s0 

z = newx + flip(newy)
 newx < 4 && newx > -4 && newy < 4 && newy > -4 
}