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