sig type t = Cil_types.logic_type_info val define : t -> unit val get_definition : t -> Fol.decl val on_definition : (t -> Fol.decl -> unit) -> unit end