(** A variant of [transl_expr_charact], for use when the destination register is the one associated with a variable. *)

Lemma tr_exitexpr_incr:
forall s1 s2, state_incr s1 s2 ->
forall map a ns nexits,
tr_exitexpr s1.(st_code) map a ns nexits ->
tr_exitexpr s2.(st_code) map a ns nexits.