let R be 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

set s = the State of (SCM R);

(Exec ((AddTo (a,b)), the State of (SCM R))) . (IC ) = (IC the State of (SCM R)) + 1 by Th12;

hence not AddTo (a,b) is halting by Th18; :: thesis: verum

let a, b be Data-Location of R; :: thesis: not AddTo (a,b) is halting

set s = the State of (SCM R);

(Exec ((AddTo (a,b)), the State of (SCM R))) . (IC ) = (IC the State of (SCM R)) + 1 by Th12;

hence not AddTo (a,b) is halting by Th18; :: thesis: verum