Here is mandelbrot baby! it gave me a idea,  also could be interpreted like khepric mandelbrot.
not has recursive has to popal one but valide. I will do mandelmath sometime.

--
most attached file or result are positively balance at
:https://sites.google.com/site/sinpix12823fractal/
maddelbrot         { ; mathematic at default
  reset=2004 type=formula formulafile=2012_7.frm
  formulaname=notianal-1
  center-mag=1.04301/0.0391803/1.122181/1/-90/-1.23373533611470521e-014
  params=2/0.5/-1/2 maxiter=2000 inside=bof60 cyclerange=1/3
  colors=00000e0e00eee00e0eeL0eeeLLLLLzLzL000zLLzLzzzLzzz000555<3>HHHKKKOO\
  O<3>ccchhhmmmssszzz00z<3>z0z<3>z00<3>zz0<3>0z0<3>0zz<2>0GzVVz<3>zVz<3>zV\
  V<3>zzV<3>VzV<3>Vzz<2>Vbzhhz<3>zhz<3>zhh<3>zzh<3>hzh<3>hzz<2>hlz00S<3>S0\
  S<3>S00<3>SS0<3>0S0<3>0SS<2>07SEES<3>SES<3>SEE<3>SSE<3>ESE<3>ESS<2>EHSKK\
  S<2>QKSSKSSKQSKOSKMSKK<2>SQKSSKQSKOSKMSKKSK<2>KSQKSSKQSKOSKMS00G<3>G0G<3\
  >G00<3>GG0<3>0G0<3>0GG<2>04G88G<2>E8GG8GG8EG8CG8AG88<2>GE8GG8EG8CG8AG88G\
  8<2>8GE8GG8EG8CG8AGBBG<2>FBGGBGGBFGBDGBCGBB<2>GFBGGBFGBDGBCGBBGB<2>BGFBG\
  GBFGBDGBCG000<6>000
  }
frm:notianal-1{;sinpix
a=real(p1+imag(p2))
b=1/a
z=z1=c=pixel*b:
u=z^(-a*z1)-c/2
t=1/u
z=-(t^u*z+c)
|z|<800
}