angel {
fractal:
  title="angel" width=640 height=640 numlayers=2
layer:
  outalpha=0 caption="New Layer 1" opacity=100 visible=yes alpha=yes
mapping:
  center=-184.645689595201403/2463.04956964517437
  magn=0.000706422435367369493 angle=181.773986128741673 numtransforms=1
transform:
  filename="Fractint.uxf" entry="ViewWindow" p_ar=1
formula:
  filename="zg.frm" entry="Simmetrico_random" maxiter=100 percheck=normal
inside:
  filename="lp.ucl" entry="lp-Shapes1" transfer=linear repeat=yes
  p_type="Graph" p_center=1/0.5 p_height=1 p_width=0.6 p_decay=1 p_angle=0
  p_numarms=4 f_fn1=sin
outside:
  filename="Fractint.ucl" entry="outside" transfer=none repeat=yes
  p_outside="iter" p_n=1 p_logmap=0 p_biomorph=-1 p_bailout=100
  p_smooth=yes
gradient:
  smooth=no numnodes=4 index=15 color=2230147 index=102 color=7266810
  index=192 color=13044297 index=259 color=451314
layer:
  outalpha=0 caption="Layer 1" visible=yes alpha=yes
mapping:
  center=1.56103195746068943/0.153836036808621087 magn=0.524506662300712622
  angle=90.7895455611253082 numtransforms=1
transform:
  filename="Fractint.uxf" entry="ViewWindow" p_ar=1
formula:
  filename="zg.frm" entry="seashell" maxiter=100 percheck=normal
inside:
  filename="lp.ucl" entry="lp-Shapes1" transfer=linear repeat=yes
  p_type="Fan" p_center=1/0.5 p_height=1 p_width=0.6 p_decay=1 p_angle=0
  p_numarms=4 f_fn1=sin
outside:
  filename="Fractint.ucl" entry="outside" transfer=none repeat=yes
  p_outside="iter" p_n=1 p_logmap=0 p_biomorph=-1 p_bailout=100
  p_smooth=yes
gradient:
  smooth=no numnodes=4 index=15 color=2230147 index=102 color=7266810
  index=192 color=13044297 index=259 color=451314
}

zg.frm:Simmetrico_random {; Giuseppe Zito
         z = pixel ,
          a = 2.8 :
x = real(z), y = imag(z)
        if(rand > 0.5) 
            newx = -y
            newy = x
          else
            newx = 1.+a*(x-1.)/(((x-1.)*(x-1.))+y*y+1.)
            newy = a*y/(((x-1)*(x-1))+y*y+1)
          endif
               z = newx + flip(newy)
 newx < 4 && newx > -4 && newy < 4 && newy > -4
}


zg.frm:seashell {; Giuseppe Zito
 z = pixel ,
c4 = -0.998097
c6 = -0.078002
d0 = -0.593396
d3 = 0.763522
d5 = -0.958196
d7 = -0.068108
d13 = 0.651859
  : 
 x = real(z), y = imag(z)
s0 = x
s0 = s0 /x
s0 = s0 -x
s0 = s0 +c4
s0 = s0 *c6
s0 = s0 +x
s0 = s0 /y
s0 = s0 -y
s0 = s0 *x
s0 = s0 /y
newx = s0 
s0 =d0
s0 = s0 *d3
s0 = s0 /d5
s0 = s0 +d7
s1 = y
s1 = s1 -y
s1 = s1 /x
s0 = s0 *s1
s0 = s0 /d13
s0 = s0 -x
s0 = s0 /y
newy = s0 
z = newx + flip(newy)
 newx < 4 && newx > -4 && newy < 4 && newy > -4 
}