Constant_key.T
type t =
| Shared of Tnode.t
| Rooted of Base.int * Tnode.t
val compare : t -> t -> Base.int
val sexp_of_t : t -> Sexplib0.Sexp.t
val hash_fold_t : Ppx_hash_lib.Std.Hash.state -> t -> Ppx_hash_lib.Std.Hash.state
val hash : t -> Ppx_hash_lib.Std.Hash.hash_value