functional language for computing with geometry
DEF cubo=cuboid:<1,2,1>;
DEF cubocol=cubo COLOR BLUE;
DEF cubocol2=(cuboid:<1,0.5> COLOR YELLOW) * QUOTE:<0.5>;
DEF cubocol3=S:2:0.5:cubo COLOR RED;
DEF cubocol4=cubo MATERIAL Transparentmaterial:<GREEN, 0.4>;
DEF out=struct:<cubocol, T:1:(size:1:cubocol+1), cubocol2, T:1:(size:1:cubocol2+1), cubocol3, T:1:(size:1:cubocol3+1), cubocol4, T:1:(size:1:cubocol4+1), cubocol3, T:1:(size:1:cubocol3+1), cubo>;
