home *** CD-ROM | disk | FTP | other *** search
/ Computer Shopper 144 / DPCS0200.iso / Editor / frain200 / fract200.frm < prev    next >
Encoding:
Text File  |  1999-09-09  |  411 b   |  20 lines
  1.  
  2. comment { Formula file released with Fractint 20.0 }
  3.  
  4. {--- SYLVIE GALLET -------------------------------------------------------}
  5.  
  6. ismand_demo { ; sylvie_gallet@compuserve.com
  7.               ; uses the Pokorny formula z -> 1/(z^2+c)
  8. ;
  9. ; Use the spacebar to toggle between mandel and julia sets
  10. ;
  11. if (ismand)
  12.   z = 0 , c = pixel
  13. else
  14.   z = pixel , c = p1
  15. endif
  16. :
  17. z = 1 / (z*z + c)
  18. |z| <= p2
  19. }
  20.