| view namespaces |
namespaces := MooseModel root allModels first allModelNamespaces.
view := MOViewRenderer new.
view shape rectangle
width: #numberOfClasses;
height: #numberOfMethods;
linearFillColor: #numberOfLinesOfCode within: namespaces.
view nodes: namespaces.
view edgesToAll: #providerNamespaces.
view dominanceTreeLayout.
view open.