Up
Module
Make
(
Key1
:
Key
) (
Key2
:
Key
)
Parameters
Key1
:
Key
Key2
:
Key
Signature
type
'data t = (
Key1.t
,
Key2.t
, 'data)
t
val
sexp_of_t : ('data ->
Sexplib.Sexp.t
) -> 'data
t
->
Sexplib.Sexp.t
include
Core.Std.Equal.S1
with
type
'a
t
:= 'a
t
type
'a t
val
equal : 'a
Equal.equal
-> 'a
t
Equal.equal
val
create : unit -> 'data
t
val
of_alist_exn : (
Key1.t
*
Key2.t
* 'data) list -> 'data
t