thus
addnat is commutative
:: thesis: addnat is associative
let n1 be Element of NAT ; :: according to BINOP_1:def 14 :: thesis: for b1, b2 being Element of NAT holds addnat . n1,(addnat . b1,b2) = addnat . (addnat . n1,b1),b2
let n2, n3 be Element of NAT ; :: thesis: addnat . n1,(addnat . n2,n3) = addnat . (addnat . n1,n2),n3
thus addnat . n1,(addnat . n2,n3) =
n1 + (addnat . n2,n3)
by Def23
.=
n1 + (n2 + n3)
by Def23
.=
(n1 + n2) + n3
.=
(addnat . n1,n2) + n3
by Def23
.=
addnat . (addnat . n1,n2),n3
by Def23
; :: thesis: verum