let R be good Ring; :: thesis: for a, b being Data-Location of R
for il being Element of NAT holds NIC (a := b),il = {(succ il)}

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