let il be Element of NAT ; :: thesis: for a being Int-Location
for f being FinSeq-Location holds NIC ((a :=len f),il) = {(succ il)}
let a be Int-Location ; :: thesis: for f being FinSeq-Location holds NIC ((a :=len f),il) = {(succ il)}
let f be FinSeq-Location ; :: thesis: NIC ((a :=len f),il) = {(succ il)}
set i = a :=len f;
for s being State of SCM+FSA st IC s = il holds
(Exec ((a :=len f),s)) . (IC SCM+FSA) = succ (IC s) by SCMFSA_2:100;
hence NIC ((a :=len f),il) = {(succ il)} by Lm5; :: thesis: verum