theorem
  MultBy(a,k1,b,k2) is non halting
proof
  set s =the  State of SCMPDS;
  Exec(MultBy(a,k1,b,k2), s).IC SCMPDS = IC s + 1 by Th48;
  hence thesis by Th60;
end;
