let process_at_vars env l (obligs, p) =
let obligs = map_named_prop (W.quantify_at_vars env l) obligs in
(* notice that [replace_at_vars] can remove l from env... *)
let p = map_named_prop (W.process_at_vars env l) p in
obligs, p