let
mk_let_vi v exp p =
let
v =
WpFol
.cvar_to_folvar v
in
mk_let ~fresh:
true
v exp p