thus
addnat is commutative
addnat is associative
let n1, n2, n3 be Element of NAT ; BINOP_1:def 3 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
; verum