marble {
fractal:
  title="marble" width=1024 height=768 author="Giuseppe Zito"
  created="March 12, 1999" numlayers=2
layer:
  outalpha=0 caption="New Layer 1" opacity=100 visible=yes alpha=yes
  mergemode=color
mapping:
  center=0.263643227191970273/0.394009679699238145 magn=4.05519996684467439
  angle=0
formula:
  filename="zg.frm" entry="straw" maxiter=100 percheck=normal
inside:
  filename="dmj.ucl" entry="dmj-Trap" transfer=linear repeat=yes
  p_trapshape="point" p_trapcolor="distance" p_traptype="closest"
  p_traporder=4 p_trapfreq=1 p_trapcenter=0/0 p_trapdrift=0/0
  p_traporbit=0/0 p_movetrap=no p_aspect=1 p_threshold=0.25 p_diameter=1
  p_angle=0 p_anglestep=0 p_skew=0 p_skewstep=0 p_trapstart=0
  p_trapiter=10000 p_trapskip=0 p_gauss=0 p_gaussr=0 p_gausss=0
  p_gausscenter=0/0 p_radialmode="kaleidoscope"
outside:
  transfer=none repeat=yes
gradient:
  smooth=no numnodes=3 index=135 color=932950 index=231 color=0 index=367
  color=12963834
layer:
  outalpha=0 caption="New Layer 2" opacity=100 visible=yes alpha=yes
  mergemode=difference
mapping:
  center=0.263643227191970273/0.394009679699238145 magn=4.05519996684467439
  angle=0
formula:
  filename="zg.frm" entry="straw" maxiter=100 percheck=normal
inside:
  filename="dmj.ucl" entry="dmj-Lyapunov" transfer=linear repeat=yes
  p_trackvariable="real / imag" p_negative="absolute value"
outside:
  transfer=none repeat=yes
gradient:
  smooth=no numnodes=12 index=30 color=5658198 index=31 color=0 index=32
  color=4013373 index=133 color=16777215 index=161 color=4408131 index=162
  color=0 index=163 color=4079166 index=191 color=16777215 index=294
  color=5723991 index=295 color=0 index=296 color=3026478 index=313
  color=16777215
}

zg.frm:straw {; Giuseppe Zito
 z = pixel ,
c7 = 0.68142
c9 = -0.867481
c11 = -0.786637
c12 = 0.694595
d3 = 0.96822
d5 = 0.360598
d8 = 0.133834
  : 
 x = real(z), y = imag(z)
s0 = x
s0 = s0 /x
s0 = s0 +x
s1 =c7
s0 = s0 *s1
s0 = s0 +c9
s0 = s0 /c11
s0 = s0 +c12
s0 = s0 -y
newx = s0 
s0 = x
s0 = s0 *y
s0 = s0 +d3
s1 =d5
s1 = s1 *x
s0 = s0 *s1
s0 = s0 -d8
s0 = s0 +x
newy = s0 
z = newx + flip(newy)
 newx < 4 && newx > -4 && newy < 4 && newy > -4 
}