| view rawView elements | rawView := ROView new. view := ROMondrianViewBuilder view: rawView. elements := ROElement spritesOn: (1 to: 11). elements do: [:elem| elem addShape: (ROVisualID new). ]. rawView addAll: elements. rawView addAll: (ROEdge linesFor: (Array with: elements first -> elements second with: elements second -> elements fifth with: elements second -> elements third )). ROTreeLayout on: elements. view noLayout. view open