mirror of
https://github.com/c-cube/sidekick.git
synced 2025-12-06 03:05:31 -05:00
15 lines
451 B
OCaml
15 lines
451 B
OCaml
(** Plugin for uninterpreted symbols *)
|
|
|
|
open Sidekick_core
|
|
|
|
(** Argument to the plugin *)
|
|
module type ARG = sig
|
|
val is_unin_function : Term.t -> bool
|
|
(** [is_unin_function t] should be true iff [t] is a function symbol
|
|
or constant symbol that is uninterpreted
|
|
(possibly applied to {b type} arguments in the case of a polymorphic
|
|
function/constant). *)
|
|
end
|
|
|
|
val builder : (module ARG) -> Core.Plugin.builder
|
|
(** Create a new plugin *)
|