A link for a tweet? On Mon, May 5, 2014 at 7:59 PM, Alexandre Bergel &lt;alexandre.bergel(a)me.com&gt; wrote: Hi! Just to share a screenshot of what we are working on: <Screen Shot 2014-05-05 at 12.47.39 PM.png> Result of the script: =-=-==-=-==-=-==-=-==-=-= | b | b := RTGraphBuilder new. b nodes color: Color gray. b edges connectTo: #dependentClasses; color: (Color gray alpha: 0.1); if: [ :f :t | '*Example*' match: f name ] color: (Color green alpha: 0.2). b layout partition: [ :c | c inheritsFrom: RTTest ]; partition: [ :c | c inheritsFrom: RTLayout ]; partition: [ :c | c inheritsFrom: RTShape ]; partition: [ :c | c inheritsFrom: RTInteraction ]; partition: [ :c | c inheritsFrom: RTBuilder ]; partition: [ :c | '*Example*' match: c name ]; partition: true; force. b layout circle radius: 250. b global normalizeSize: [ :c | c dependentClasses size ] min: 5 max: 30 using: #sqrt. b addAll: (RTObject withAllSubclasses). b open =-=-==-=-==-=-==-=-==-=-= Comments are welcome! Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;. _______________________________________________ Moose-dev mailing list Moose-dev(a)iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev _______________________________________________ Moose-dev mailing list Moose-dev(a)iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev