module Fol_ergo: sig
.. end
val get_field : Cil_types.fieldinfo -> string
val set_field : Cil_types.fieldinfo -> string
val constant : Format.formatter -> Fol.constant -> unit
val pp_list : (Format.formatter -> 'a -> unit) -> Format.formatter -> 'a list -> unit
val pp_flow : Format.formatter ->
string -> string -> (Format.formatter -> 'a -> unit) -> 'a list -> unit
val pp_block : Format.formatter ->
string -> string -> (Format.formatter -> 'a -> unit) -> 'a list -> unit
val pp_var : Format.formatter -> Fol.Var.t -> unit
val collect_assoc : string -> Fol.term list -> Fol.term list -> Fol.term list
val fpp_term : Format.formatter -> Fol.term -> unit
val collect_or : Fol.pred list -> Fol.pred -> Fol.pred list
val collect_and : Fol.pred list -> Fol.pred -> Fol.pred list
val collect_imply : Fol.pred list -> Fol.pred -> Fol.pred list
val collect_iff : Fol.pred list -> Fol.pred -> Fol.pred list
type 'a
pp = Format.formatter -> 'a -> unit
type
pp_env = {
}
val export_tau : (Cil_types.typ -> Formula.tau) -> Format.formatter -> Formula.tau -> unit
val pp_args : (Cil_types.typ -> Formula.tau) -> Format.formatter -> Fol.Var.t list -> unit
val fpp_f_let : (Cil_types.typ -> Formula.tau) -> Format.formatter -> Fol_cc.f_let -> unit
val fpp_lf_let : (Cil_types.typ -> Formula.tau) ->
Format.formatter -> Fol_cc.f_let list -> unit
val epp_pred_vbox : pp_env -> Format.formatter -> Fol.pred -> unit
val tag_named : string -> string
val epp_pred_atom : pp_env -> Format.formatter -> Fol.pred -> unit
val fpp_pred : (Format.formatter -> Fol.pred -> unit) ->
(Cil_types.typ -> Formula.tau) -> Format.formatter -> Fol.pred -> unit
val export_get_set_field : (Cil_types.typ -> Formula.tau) ->
Format.formatter -> Cil_types.fieldinfo -> unit
val export_get_set_other : (Cil_types.typ -> Formula.tau) ->
Format.formatter ->
Cil_types.fieldinfo -> string -> Cil_types.fieldinfo -> unit
val export_generated_axiomatics : (Cil_types.typ -> Formula.tau) ->
Format.formatter -> Cil_datatype.Fieldinfo.t -> unit
val pp_param : (Cil_types.typ -> Formula.tau) -> Format.formatter -> Fol.Var.t -> unit
val fpp_item : (Format.formatter -> 'a -> unit) ->
(Format.formatter -> Fol.pred -> unit) ->
(Cil_types.typ -> Formula.tau) ->
Format.formatter -> string -> (Fol.Var.t, 'a, Fol.pred) Formula.item -> unit
: Format.formatter -> ('a, 'b, 'c) Formula.declaration -> unit
val fpp_decl : (Format.formatter -> 'a -> unit) ->
(Format.formatter -> Fol.pred -> unit) ->
(Cil_types.typ -> Formula.tau) ->
Format.formatter -> (Fol.Var.t, 'a, Fol.pred) Formula.declaration -> unit
val fpp_goal : (Format.formatter -> 'a -> unit) -> Format.formatter -> string -> 'a -> unit
val export_term : Format.formatter -> Fol.term -> unit
val pp_pred_atom : (Cil_types.typ -> Formula.tau) -> Fol.pred pp
val export_pred : (Cil_types.typ -> Formula.tau) -> Format.formatter -> Fol.pred -> unit
val export_item : (Cil_types.typ -> Formula.tau) ->
(Format.formatter -> Fol.pred -> unit) ->
(Cil_types.typ -> Formula.tau) ->
Format.formatter ->
string -> (Fol.Var.t, Fol.pred, Fol.pred) Formula.item -> unit
val export_decl : (Cil_types.typ -> Formula.tau) ->
Format.formatter ->
(Fol.Var.t, Fol.term, Fol.pred) Formula.declaration -> unit
val export_goal : (Cil_types.typ -> Formula.tau) ->
Format.formatter -> string -> Fol.pred -> unit
module Make: functor (
L
:
sig
end
) ->
sig
.. end