A1: dom (r (#) f) = dom f by Def5;
rng (r (#) f) c= RAT by VALUED_0:def 4;
hence r (#) f is PartFunc of C,RAT by A1, RELSET_1:11; :: thesis: verum