functor
  (L : sig val tau_of_ctype_logic : Cil_types.typ -> Formula.tau end->
  sig
    type pred = Fol.pred
    type decl = Fol.decl
    val export_tau : Format.formatter -> Formula.tau -> unit
    val export_term : Format.formatter -> Fol.term -> unit
    val pp_pred_atom : Fol.pred Fol_pretty.pp
    val export_pred : Format.formatter -> Fol.pred -> unit
    val export_section : Format.formatter -> string -> unit
    val export_item :
      Format.formatter ->
      string -> (Fol.Var.t, Fol.term, Fol.pred) Formula.item -> unit
    val export_decl :
      Format.formatter ->
      (Fol.Var.t, Fol.term, Fol.pred) Formula.declaration -> unit
    val export_goal : Format.formatter -> string -> Fol.pred -> unit
  end