< iter_edges_e : (Services.G.E.t Dgraph.DGraphViewItem.view_item -> unit) ->                  unit;   iter_nodes : (Services.G.V.t Dgraph.DGraphViewItem.view_item -> unit) -> 'a;   iter_succ_e : (Services.G.E.t Dgraph.DGraphViewItem.view_item -> unit) ->                 Services.G.V.t Dgraph.DGraphViewItem.view_item -> unit;   .. > -> object   val services :     (Cg_viewer.service_id,      bool Pervasives.ref *      Services.G.V.t Dgraph.DGraphViewItem.view_item list Pervasives.ref)     Hashtbl.t   method deploy : Services.G.V.t Dgraph.DGraphViewItem.view_item -> unit   method edge_kind :     Services.G.E.t Dgraph.DGraphViewItem.view_item -> Services.G.E.label   method is_deployed : Cg_viewer.service_id -> bool   method is_root : Services.G.V.t Dgraph.DGraphViewItem.view_item -> bool   method service :     Services.G.V.t Dgraph.DGraphViewItem.view_item -> Cg_viewer.service_id   method undeploy : Services.G.V.t Dgraph.DGraphViewItem.view_item -> unit end