let R be good Ring; :: thesis: for a, b being Data-Location of R holds not AddTo (a,b) is halting
let a, b be Data-Location of R; :: thesis: not AddTo (a,b) is halting
consider s being State of (SCM R);
(Exec ((AddTo (a,b)),s)) . (IC (SCM R)) = succ (IC s) by Th14;
hence not AddTo (a,b) is halting by Th20; :: thesis: verum