sig
  val model_name : string
  type t_exp
  type t = Toprop.T_no_call.t_exp Fol.t_pred
  type t_env
  val new_env : unit -> Toprop.T_no_call.t_env
  val replace_at_vars :
    Toprop.T_no_call.t_env ->
    Cil_types.logic_label -> Toprop.T_no_call.t -> Toprop.T_no_call.t
  val quantify_at_vars :
    Toprop.T_no_call.t_env ->
    Cil_types.logic_label -> Toprop.T_no_call.t -> Toprop.T_no_call.t
  val assign :
    Cil_types.lval ->
    Cil_types.exp -> Toprop.T_no_call.t -> Toprop.T_no_call.t
  val return :
    Db_types.kernel_function ->
    Cil_types.exp option -> Toprop.T_no_call.t -> Toprop.T_no_call.t
  val test :
    Cil_types.exp ->
    Toprop.T_no_call.t -> Toprop.T_no_call.t -> Toprop.T_no_call.t
  val quantif_locals :
    Db_types.kernel_function -> Toprop.T_no_call.t -> Toprop.T_no_call.t
  val quantify_loop_assigns :
    Cil_types.identified_term Cil_types.assigns list ->
    Toprop.T_no_call.t -> Toprop.T_no_call.t option
  val close :
    Toprop.T_no_call.t_env ->
    Db_types.kernel_function -> Toprop.T_no_call.t -> Toprop.T_no_call.t
  val fol : Toprop.T_no_call.t -> Fol.predicate
  val pretty : Format.formatter -> Toprop.T_no_call.t -> unit
  type t_pred = Toprop.T_no_call.t
  val pretty_pred : Format.formatter -> Toprop.T_no_call.t_pred -> unit
  val translate :
    Db_types.kernel_function ->
    Toprop.T_no_call.t_env ->
    Cil_types.predicate Cil_types.named -> Toprop.T_no_call.t_pred
  val add_glob_decls : Fol.decl list -> Fol.decl list
end