A1: dom (f ^2 ) = dom f by Th11;
rng (f ^2 ) c= REAL by VALUED_0:def 3;
hence f ^2 is PartFunc of C,REAL by A1, RELSET_1:11; :: thesis: verum