:: deftheorem Def8 defines hcflatplus NAT_LAT:def 8 :
for b1 being BinOp of NATPLUS holds
( b1 = hcflatplus iff for m, n being NatPlus holds b1 . (m,n) = m gcd n );