functional language for computing with geometry
DEF TrellisMed3D = (T:2:-0.25 ~ S:2:0.5 ~ OffSet:<1,1,1> ~ Trellis):<hcol,r2 - r0>;
DEF TheMedTrellis = T:3:(hcol+3): TrellisMed3D;
DEF MedTrellis = Radial:24: (T:1:r0:TheMedTrellis);
DEF DoubleMedTrellis = STRUCT: <MedTrellis,R:<1,2>:(PI/24),MedTrellis>;
DEF out = STRUCT: <basement, T:3:hbasament, FullExtWall, FullTetto, CrossCourtWall, CrossWalls, MedWallArcs, TheMedColumns, FullTopCourtWall, FullCourTetto, The22Columns, The22Beams, The22Hwall, The11Frieze, TopTrellis , DoubleMedTrellis >;
CenteredCameras:out;