Llair.Blocktype t = blockinclude Ppx_compare_lib.Comparable.S with type t := tval compare : t Base__Ppx_compare_lib.compareinclude Ppx_compare_lib.Equal.S with type t := tval equal : t Base__Ppx_compare_lib.equalval sexp_of_t : t -> Sexplib0.Sexp.tval set_goal_distance : int -> t -> unitmodule Tbl : NS.HashTable.S with type key := t