sig
  val interface : OBus_name.interface
  val m_Get : (string * string, OBus_value.V.single) OBus_member.Method.t
  val m_GetAll :
    (string, (string * OBus_value.V.single) list) OBus_member.Method.t
  val m_Set :
    (string * string * OBus_value.V.single, unit) OBus_member.Method.t
  val s_PropertiesChanged :
    (string * (string * OBus_value.V.single) list * string list)
    OBus_member.Signal.t
  type 'a members = {
    m_Get : 'OBus_object.t -> string * string -> OBus_value.V.single Lwt.t;
    m_GetAll :
      'OBus_object.t -> string -> (string * OBus_value.V.single) list Lwt.t;
    m_Set :
      'OBus_object.t -> string * string * OBus_value.V.single -> unit Lwt.t;
  }
  val make :
    'OBus_interfaces.Org_freedesktop_DBus_Properties.members ->
    'OBus_object.interface
end