let a be Int_position; :: thesis: for l being Element of NAT
for k1, k2 being Integer holds NIC (((a,k1) := k2),l) = {(l + 1)}

let l be Element of NAT ; :: thesis: for k1, k2 being Integer holds NIC (((a,k1) := k2),l) = {(l + 1)}
let k1, k2 be Integer; :: thesis: NIC (((a,k1) := k2),l) = {(l + 1)}
set i = (a,k1) := k2;
for s being State of SCMPDS st IC s = l holds
(Exec (((a,k1) := k2),s)) . (IC ) = (IC s) + 1 by SCMPDS_2:46;
hence NIC (((a,k1) := k2),l) = {(l + 1)} by Th1; :: thesis: verum