functional language for computing with geometry
DEF out = ((EMBED:2 ~ CUBOID):<1>
RIGHT
(EMBED:1 ~ CUBOID):<1,1>
CUBOID:<1,1,1>);
