Functor Mvar.MT


module MT: 
functor (M : Mv_sig) -> sig .. end
From Mv_sig, defines everything needed for translation
Parameters:
M : Mv_sig

include M
val pp_exp : Format.formatter -> M.t_data Fol.d_term -> unit
val pp_pred : Format.formatter -> M.t_data Fol.d_term Fol.t_pred -> unit
val mk_minus_pointer : 'a Fol.d_term -> 'a Fol.d_term -> 'a Fol.d_term

type t_env = {
   env_at : (string, Fol.variable * M.t_exp) Hashtbl.t;
}
this is a table to store \at and \old expressions.
val new_env : unit -> t_env
val term_at : t_env ->
Cil_types.logic_label -> M.t_exp -> Fol.pure_type -> 'a Fol.d_term
build a new variable and store in env that this variable is equal to e at label label.
val get_at_vars : remove:bool ->
t_env -> Cil_types.logic_label -> (Fol.variable * M.t_exp) list
val pred_forall : fresh:bool -> Fol.variable -> M.t_data Fol.d_pred -> M.t_data Fol.d_pred