reserve s for State of SCM+FSA,
  I for MacroInstruction of SCM+FSA,
  a for read-write Int-Location;
reserve i,j,k,n for Nat;
reserve P,P1,P2,Q for Instruction-Sequence of SCM+FSA;

theorem Th23:
  for f being FinSeq-Location, k being Nat st k < 71
  holds  k in dom (insert-sort f)
proof
  let f be FinSeq-Location, k be Nat;
  assume
A1: k < 71;
  card (insert-sort f) = 71 by Th22;
  hence thesis by A1,AFINSQ_1:66;
end;
