((.-*pments)%0t512*0t32)+(*pmgrps)$<pmgrp
