home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Photo CD Demo 1
/
Demo.bin
/
graphtal
/
examples
/
aono.lsy
< prev
next >
Wrap
Text File
|
1992-10-30
|
645b
|
29 lines
/*
* Example of the symbodial tree-like structure
* of Aono and Kunii.
*
* The Algorithmic Beauty of Plants, p. 59
*/
lsystem aonoTree;
const r1 = 0.9; // contraction ratio 1
r2 = 0.7; // contraction ratio 2
a1 = 10; // branching angle 1
a2 = 60; // branching angle 2
wr = 0.707; // width decrase rate
table table1{
A(l,w) -> wi(w) F(l) [ pt(-a1) B(l*r1, w*wr) ]
ro(-180) [ pt(-a2) B(l*r2, w*wr) ];
B(l,w) -> wi(w) F(l) [ tu(-a1) rv B(l*r1, w*wr) ]
[ tu(a2) rv B(l*r2, w*wr) ];
};
attributes {
axiom co("SaddleBrown") A(1,0.1);
derivation table1(10);
coneres 5;
};