sig
  exception AbortTranslation of string
  val expr : Cil_types.exp -> MV.t_exp
  val cond : Cil_types.exp -> MV.t_exp
  val predicate :
    Kernel_function.t ->
    MV.t_env -> Cil_types.predicate Cil_types.named -> MV.t_pred
  val export_fct_table :
    (MV.t_pred -> Fol.predicate) -> Fol.decl list -> Fol.decl list
end