hidden_pattern {

fractal:
  title="hidden_pattern" width=640 height=640 author="Giuseppe Zito"
  created="March 1, 1999" numlayers=2
layer:
  caption="New Layer 2" opacity=48 visible=yes alpha=no mergemode=color
mapping:
  center=1.04166666666666667/-0.025 magn=1 angle=0
formula:
  filename="zg.frm" entry="Simmetrico_random" maxiter=100 percheck=off
inside:
  filename="lkm.ucl" entry="gauss" density=4 transfer=linear repeat=yes
  p_inttype="round(z)" p_colorby="angle @ min" p_norm="none" p_fac=2/1
outside:
  transfer=linear repeat=yes
gradient:
  smooth=no numnodes=7 index=0 color=0 index=1 color=255 index=81
  color=65535 index=161 color=65280 index=240 color=16776960 index=320
  color=16711680 index=399 color=16711930
layer:
  caption="New Layer 1" visible=yes alpha=no
mapping:
  center=1.04166666666666667/-0.025 magn=1 angle=0
formula:
  filename="zg.frm" entry="Simmetrico_random" maxiter=100 percheck=off
inside:
  filename="lkm.ucl" entry="gauss" density=4 transfer=linear repeat=yes
  p_inttype="round(z)" p_colorby="minimum distance" p_norm="none" p_fac=2/1
outside:
  transfer=linear repeat=yes
gradient:
  smooth=no numnodes=4 index=99 color=4213438 index=191 color=0 index=290
  color=4210878 index=390 color=16777215
}

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
}