let f be FinSeq-Location ; :: thesis: for c being Int-Location holds not c :=len f is halting
let c be Int-Location ; :: thesis: not c :=len f is halting
set s = the State of SCM+FSA;
(Exec ((c :=len f), the State of SCM+FSA)) . (IC ) = succ (IC the State of SCM+FSA) by Th100;
hence not c :=len f is halting by Th104; :: thesis: verum