どっかのキーに UnPack(<P>,<C>) を割り当てればよいんではないかな。