A1: dom (- f) = dom f by VALUED_1:8;
len f = n by CARD_1:def 7;
hence len (- f) = n by A1, FINSEQ_3:29; :: according to CARD_1:def 7 :: thesis: verum