let a, b be Data-Location ; :: thesis: for il being Element of NAT holds NIC ((AddTo (a,b)),il) = {(succ il)}
let il be Element of NAT ; :: thesis: NIC ((AddTo (a,b)),il) = {(succ il)}
set i = AddTo (a,b);
for s being State of SCM st IC s = il holds
(Exec ((AddTo (a,b)),s)) . (IC SCM) = succ (IC s) by AMI_3:9;
hence NIC ((AddTo (a,b)),il) = {(succ il)} by Lm4; :: thesis: verum