Parameter `Make.A`

type key

type server_notif

type client_notif

val prepare : 
  Os_types.User.id option ->
  server_notif ->
  client_notif option Lwt.t

val equal_key : key -> key -> bool

val max_resource : int

val max_identity_per_resource : int