Module Fol_formula


module Fol_formula: sig .. end
Fol specialized with data type = (unit)


Fol specialized with data type = (unit)
type data = unit 
type uterm = data Fol.d_term 
type predicate = uterm Fol.t_pred 
type decl = predicate Formula.declaration 
module Vernacular: sig .. end
include Vernacular
include struct ... end
include Fol_gformula.Pool
include Fol_gformula.Predicate
val term_has_var : Fol.Var.t list -> unit Fol.d_term -> bool
val pred_has_var : Fol.Var.t list -> unit Fol.d_term Fol.t_pred -> bool
val term_closed : 'a Fol.d_term -> bool
val pred_closed : 'a Fol.d_pred -> bool
type alpha = Fol.Var.t Fol.Vmap.t 
val empty_alpha : 'a Fol.Vmap.t
val fold_alpha : (Fol.Vmap.key -> 'a -> 'b -> 'b) -> 'a Fol.Vmap.t -> 'b -> 'b
val p_more_alpha_cv : Fol.Var.t Fol.Vmap.t ->
unit Fol.d_pred -> Fol.Var.t Fol.Vmap.t * unit Fol.d_pred
val p_alpha_cv : unit Fol.d_pred -> Fol.Var.t list * unit Fol.d_pred
module PrettyUnit: Fol_pretty.Create(sig
type d = unit 
val pp_data : 'a -> unit -> unit
val pp_term : Format.formatter -> unit Fol.d_term -> unit
end)
include PrettyUnit
val pp_var : Format.formatter -> Fol.Var.t -> unit
val huge_term : int -> 'a Fol.d_term -> bool
val huge_pred : int -> 'a Fol.d_pred -> bool