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 & s . il = a :=len f 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