GnomeCanvas.canvas Gtk.obj ->
('a, 'b, 'c) DGraphModel.abstract_model ->
GMisc.label -> ['a, 'b, 'c] DGraphView.view