home *** CD-ROM | disk | FTP | other *** search
/ Ray Tracing Box / RAY_CD.mdf / raytrace / lparse / leaves.ls < prev    next >
Text File  |  1994-01-26  |  344b  |  20 lines
  1. # --- L-System Parser/Mutator --- Lj Lapre ----------------------------------
  2. 18    # recursion depth
  3. 10    # angle
  4. 10    # thickness as % of length
  5. #    
  6. #P                    # one leave
  7. [|FFFFFFFFFFF]P>(90)'P>(90)'P>(90)'P    # plant
  8. #
  9. P=[&(10)G[ccA][ccB][a][b]]
  10. G=tFtFtFtFtFtFtFtFtFtFtFtFtF
  11. #
  12. A=[+A{.].C.}
  13. B=[-B{.].C.}
  14. C=tfC
  15. #
  16. a=[+a]d
  17. b=[-b]d
  18. d=tFd
  19. @
  20.