let k be Element of NAT ; :: thesis: for a, b being Int-Location holds IncAddr (AddTo a,b),k = AddTo a,b
let a, b be Int-Location ; :: thesis: IncAddr (AddTo a,b),k = AddTo a,b
A1: InsCode (AddTo a,b) = 2 by SCMFSA_2:43;
not 2 in {6,7,8} by ENUMSET1:def 1;
hence IncAddr (AddTo a,b),k = AddTo a,b by A1, Def3; :: thesis: verum