set R = abs f;
let r be real number ; :: according to PARTFUN3:def 1 :: thesis: ( r in rng (abs f) implies 0 < r )
assume r in rng (abs f) ; :: thesis: 0 < r
then consider x being set such that
A1: x in dom (abs f) and
A2: (abs f) . x = r by FUNCT_1:def 5;
dom (abs f) = dom f by VALUED_1:def 11;
then f . x in rng f by A1, FUNCT_1:def 5;
then reconsider a = f . x as non zero real number by RELAT_1:def 9;
abs a is positive by COMPLEX1:133;
hence 0 < r by A2, VALUED_1:18; :: thesis: verum