sig
  type from_model = Lmap_bitwise.From_Model.t
  type cil_function =
      Definition of (Cil_types.fundec * Cil_types.location)
    | Declaration of
        (Cil_types.funspec * Cil_types.varinfo *
         Cil_types.varinfo list option * Cil_types.location)
  type rooted_code_annotation =
      User of Cil_types.code_annotation
    | AI of Alarms.t * Cil_types.code_annotation
  type 'a before_after = Before of '| After of 'a
  type stmts_graph = Graph.Imperative.Digraph.Concrete(Cil_datatype.Stmt).t
  type kernel_function = {
    fundec : Db_types.cil_function;
    mutable return_stmt : Cil_types.stmt option;
    mutable spec : Cil_types.funspec;
    mutable stmts_graph : Db_types.stmts_graph option;
  }
  type localisation =
      VGlobal
    | VLocal of Db_types.kernel_function
    | VFormal of Db_types.kernel_function
end