Jim Muth wrote:
FOTD -- October 16, 2005 (Rating 4) ........... .....I have no idea where it came from or what it was originally supposed to do, though with the way the functions are piled on in the iteration part, I doubt that I wrote it. ........... frm:Wallpaper { ; ; use fp math, no periodicity, XY symmetry ; p1=location in M-set ; p2=magnitude z=c=p1+(1/p2)*(tan(cos(real(pixel)))\ +flip(tan(cos(imag(pixel))))): z=z*z+c, |z| <= 64 }
The above formula appears to be very similar to the following one, which is within both of the ORGFORM collections: WALLFRM {; Mandelbrot tiler, Ray Girvan, May 1997 ; use floating-point ; use periodicity=no (press "g" to enter) ; p1= location of motif centre in Mandelbrot ; p2 = magnification (from Fractint) z=c=p1+(0.5/p2)*(tan(sin(real(pixel)))+flip(tan(sin(imag(pixel))))): z=z*z+c |z| <= 64 ;SOURCE: 97msg.frm } Sincerely, P.N.L. ------------------------------------------------- http://home.att.net/~Paul.N.Lee/PNL_Fractals.html http://www.Nahee.com/Fractals/