let close env wp = on_context env "close" wp Close_context Clear_assigns (fun env _assigns p -> let frame = L.get_frame env in WpModel.quantify_at_label frame Clabels.Here p)