Hi,
Just a note. You define the inheritance edges as: inhEdges := view edges: elements from: #yourself toAll: #directSubclasses.
Indeed but this snippet is used inside a generic function that display graphs about a code, the code is more generic like this.
Cheers,
Antoine C.