// Rekursion erklärt in einem 3D-Beispiel
// hatten wir noch nicht in der Vorlesung, kommt ggf. erst beim nächsten Mal dran)

$fn=20;

module baum(bh=25, // Höhe eines Elements
		tr=10,  // Radius eines Knotens
		l=1,    // Level (Rekursionstiefe)
		a=25,   // Neigungswinkel um x-Achse
		bc=3,   // Verzweigungs-Anzahl
		){
    if(l>0){
        cylinder(h=bh,d=tr);
        translate([0,0,bh]){
            sphere(d=tr);
            for(i=[0:(bc-1)])
                rotate([0,0,i*(360/bc)])
                rotate([a,0,0])
                    baum(bh*0.95,tr*0.75,l-1,a,bc);
        }
    }   
}

baum(l=1);