let s be State of (SCM R); :: according to AMISTD_1:def 16 :: thesis: (Exec (MultBy a,b),s) . (IC (SCM R)) = succ (IC s)
thus (Exec (MultBy a,b),s) . (IC (SCM R)) = succ (IC s) by SCMRING2:16; :: thesis: verum