let x be object ; :: according to VALUED_0:def 12 :: thesis: ( not x in dom (f1 (#) f2) or (f1 (#) f2) . x is natural )
assume x in dom (f1 (#) f2) ; :: thesis: (f1 (#) f2) . x is natural
then (f1 (#) f2) . x = (f1 . x) * (f2 . x) by Def4;
hence (f1 (#) f2) . x is natural ; :: thesis: verum