print map{$i=$_/20 ;$/,map{ $r=$;=$_/ 20;$z= $i;$n= $z* $ z,$z =2* $ r*$z+ $i ,$r=($ m=$ r *$r)- $n+ $ ;for a..z;$ m<4?$" :chr(40+ length$m) }-46..13}-20..19#!
In reply to Re: Mandelbrot (Golf) Obfuscation
by simonm
in thread Mandelbrot (Golf) Obfuscation
by tadman
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |