card (p ") = card (dom p) by VALUED_1:def 7
.= n by CARD_1:def 7 ;
hence p " is n -element by CARD_1:def 7; :: thesis: verum