view := RTMondrian new.
view shape rectangle height: [:x | x * 2].
view nodes: (1 to: 99).
view edges connectFrom: [ :x | x // 5 ].
view layout tree layered.
view