let k be Element of NAT ; :: thesis: for a, b being Data-Location holds IncAddr (AddTo a,b),k = AddTo a,b
let a, b be Data-Location ; :: thesis: IncAddr (AddTo a,b),k = AddTo a,b
InsCode (AddTo a,b) = 2 by MCART_1:7;
hence IncAddr (AddTo a,b),k = AddTo a,b by Def3; :: thesis: verum