module Interf = struct
  module T = struct
    type t = Temp.t * Temp.t with sexp
    let compare = compare
    let hash = Hashtbl.hash
  end
  include T
  include Hashable.Make (T)
end