set f = H2(m);
let r be Real; :: according to PARTFUN3:def 1 :: thesis: ( not r in rng (AckermannFunction m) or not r <= 0 )
assume r in rng H2(m) ; :: thesis: not r <= 0
then consider x being object such that
A1: x in dom H2(m) and
A2: H2(m) . x = r by FUNCT_1:def 3;
reconsider x = x as Nat by A1;
H2(m) . x = H1(m,x) by Def3;
hence not r <= 0 by A2; :: thesis: verum