home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Photo CD Demo 1
/
Demo.bin
/
graphtal
/
examples
/
spiral.lsy
< prev
next >
Wrap
Text File
|
1992-10-30
|
297b
|
47 lines
/*
* Try this one with the rayshade driver.
*/
lsystem Spiral;
const step = 100;
table Spiral
{
A -> F(10) pt(30) A;
wi(w) -> wi(w*1.05);
F(l) -> F(l*1.05);
};
attributes {
axiom wi(3) G(5) tu(110) A;
derivation Spiral(step);
coneres 20;
sphereres 5;
};