Tjr_btree_examples.Generic_example_v2
module B = Tjr_fs_shared.Blk_id_as_int
module Profile : functor () sig ... end
module Make : functor (S : sig ... end) -> sig ... end
type r
= B.blk_id
val fn : string
val make : unit -> (unit, Tjr_monad.With_lwt.lwt) Tjr_monad__.Monad_intf.m