Graf

Graf

startshape Tree

rule Tree{
4* {r 90} TreeBranch []
}

rule TreeBranch 1000 {
	//Trunk Right
    CIRCLE []
    TreeBranch { y 0.2 r 2 s 0.995 }
}

rule TreeBranch 100 {
	//Trunk Right
    CIRCLE []
    TreeBranch { y 0.2 r 90 s 0.995 }
}

rule TreeBranch 300 {
	//Trunk Left
    CIRCLE []
    TreeBranch { y 0.2 r -2 s 0.995 }
}

rule TreeBranch 200 {
	//Trunk Left
    CIRCLE []
    TreeBranch { y 0.2 r -15 s 0.995 }
}

rule TreeBranch 10{
	//Split
    CIRCLE []
   TreeBranch {  r -90 s 0.995 }
	TreeBranch {  r 90 s 0.995}
}