1include <BOSL2/std.scad>
 2module tree(l=1500, sc=0.7, depth=10)
 3    recolor("lightgray")
 4    cylinder(l=l, d1=l/5, d2=l/5*sc)
 5        attach(TOP)
 6            if (depth>0)
 7                zrot(90)
 8                zrot_copies(n=2)
 9                yrot(30) tree(depth=depth-1, l=l*sc, sc=sc);
10            else
11                recolor("springgreen")
12                yscale(0.67)
13                teardrop(d=l*3, l=1, anchor=BOT, spin=90);
14tree();
15
16
17// vim: expandtab tabstop=4 shiftwidth=4 softtabstop=4 nowrap