sig
  type 'a t
  val empty : 'a -> 'a Ode_interface_sig.Interface.ObsMap.t
  val add :
    Ode_interface_sig.Interface.connected_component ->
    'a ->
    'a list Ode_interface_sig.Interface.ObsMap.t ->
    'a list Ode_interface_sig.Interface.ObsMap.t
  val get :
    Ode_interface_sig.Interface.connected_component ->
    'a list Ode_interface_sig.Interface.ObsMap.t -> 'a list
  val reset :
    Ode_interface_sig.Interface.connected_component ->
    'a list Ode_interface_sig.Interface.ObsMap.t ->
    'a list Ode_interface_sig.Interface.ObsMap.t
end