:: deftheorem Def3A defines TRANQN DIOPHAN2:def 4 :
for b1 being Function of RAT,NAT holds
( b1 = TRANQN iff for x being Rational holds b1 . x = denominator x );