It could be very useful in serialization because sometimes you start traversing an object and you end up traversing much more objects you wanted. So Mondrian could help to find the problematic objects.
Visualization is cool indeed
It would be great to have the ability of affecting the parent graph of a node, not just the subgraph of a node.
+1
This goes against some principles in Mondrian (e.g., zOrdering different than object nesting).
I tried the following:
-=-=-=-=-=-=-=-=-=-=-=-= | n | n := OrderedCollection new.
view shape rectangle withText. view interaction on: MOMouseDown do: [ :ann | n add: (MONode on: 'hello'). view root addNode: n last. (MOGridLayout forNodes: n) applyOn: ann node root. view root resetCache; updateWindow ]. view node: 'press me' -=-=-=-=-=-=-=-=-=-=-=-=
Additionally, it would be nice to express the graph more concisely. I am a newbie in Mondrian so maybe it has not sense what I imagine (following the example with Collection hierarchy):
view shape expandableNode childrenNodesWith: [:aNodeToExpand | aExpandableNode subclasses]. view node: Collection. view edgesFrom: #superclass.
is it possible to add only the root at first and the rest when nodes expand?
Humm... Hardly feasible without completely bypassing many things Mondrian was designed for. However, I am currently working on Roassal, a new visualization framework with a strong emphasis on interaction. What you are asking for will be trivial to do.
Alexandre
On 14 Nov 2011, at 17:30, Alexandre Bergel wrote:
Martin, are you happy with what Mondrian offers currently? Is there anything else you would like to see?
Alexandre
On 8 Nov 2011, at 15:50, Martin Dias wrote:
Johan and Alexandre: Thank you, was funny to play with Mondrian Easel and to see AspectMaps. Doru: You was right, I had in mind something like a tree. I made a proof script using blocks for recursion... look:
| blockForClass blockForExpandable blockForLeaf | blockForClass := [:aClass | blockForLeaf value: aClass. aClass subclasses do: [:aSubclass | (aSubclass subclasses isEmpty ifTrue: [blockForLeaf] ifFalse: [blockForExpandable]) value: aSubclass ] ]. blockForLeaf := [:aClass | view shape label text: #name. view node: aClass. view edgesFrom: #superclass. view horizontalTreeLayout ]. blockForExpandable := [:aClass | view interaction whenClickingUpdateNode: [:x | blockForClass value: x ] withLayoutUpdate: true. view shape rectangle dashedBorder; size: 10; borderColor: Color lightGray. view node: aClass. view edgesFrom: #superclass. view horizontalTreeLayout ]. blockForClass value: Collection.
On Tue, Nov 8, 2011 at 4:16 AM, Tudor Girba tudor@tudorgirba.com wrote: Hi,
I think Martin was asking for a script that would add nodes to the parent graph, not to the inner graph of a selected node.
The idea is to have an expandable graph that would behave similarly to a tree morph widget (when you expand a node, the whole tree becomes larger).
Cheers, Doru
On 8 Nov 2011, at 04:28, Alexandre Bergel wrote:
During Smalltalks conference, we started with Mariano and Doru to do an experiment: to use Mondrian to visualize the graph that is being serialized with Fuel.
Cool!
- Is it fine how I installed Mondrian?
Gofer it squeaksource: 'Mondrian'; package: 'ConfigurationOfMondrian'; load. (ConfigurationOfMondrian project latestVersion) load.
Yes.
- For large graphs, I would like to show them lazily, maybe drawing some expandable nodes (+). Do you understand what I mean? Is that possible?
Try this in an easel:
view shape rectangle size: 20. view interaction action: #inspect. view interaction whenEnteringUpdateNode: [:node | view interaction forwarder. view nodes: (Set allSubclasses). view interaction forwarder. view edgesFrom: #superclass.. view treeLayout ] whenLeavingUpdateNode: [:node | ] withLayoutUpdate: true. view nodes: (1 to: 3) -=-=-=-=-=-=-=-=-=-=-=-=
Cheers, Alexandre -- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
-- www.tudorgirba.com
"Not knowing how to do something is not an argument for how it cannot be done."
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
-- _,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;: Alexandre Bergel http://www.bergel.eu ^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;._,.;:~^~:;.
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
-- www.tudorgirba.com
"Reasonable is what we are accustomed with."
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev
Moose-dev mailing list Moose-dev@iam.unibe.ch https://www.iam.unibe.ch/mailman/listinfo/moose-dev