let global_scope m p = if L.has_context_vars [m.x_alloc] p then F.p_implies (F.p_app1 "global" m.alloc) p else p