module type Equatable = sig .. end
sig
end
type 'a t
'a
val equal : 'a t -> 'a t -> bool
'a t -> 'a t -> bool