reserve a, b for Int_position,
  i for Instruction of SCMPDS,
  l for Element of NAT,
  k, k1, k2 for Integer;

theorem Th11:
  NIC(SubFrom(a,k1,b,k2), l) = {l+1}
proof
  set i = SubFrom(a,k1,b,k2);
  for s being State of SCMPDS st IC s = l holds Exec(i,s).IC
  SCMPDS = IC s + 1 by SCMPDS_2:50;
  hence thesis by Th1;
end;
