Definition restrPermMap p' m (Hlt: permMapLt p' (getMaxPerm m)) : mem.

Lemma restrPermMap_correct : forall p' m (Hlt: permMapLt p' (getMaxPerm m)) b ofs, permission_at (restrPermMap Hlt) b ofs Max = Maps.PMap.get b (getMaxPerm m) ofs /\ permission_at (restrPermMap Hlt) b ofs Cur = Maps.PMap.get b p' ofs.