reserve x for set,
  k for Element of NAT;
reserve s for State of SCMPDS;
reserve d1,d2,d3,d4,d5 for Element of SCM-Data-Loc,
  k1,k2,k3,k4,k5,k6 for Integer;
reserve I for Instruction of SCMPDS;

theorem
  for I being Instruction of SCMPDS holds InsCode I <= 14
proof
  let I be Instruction of SCMPDS;
  InsCode I = 0 or InsCode I = 1 or InsCode I = 2 or InsCode I = 3 or
  InsCode I = 4 or InsCode I = 5 or InsCode I = 6 or InsCode I = 7 or
  InsCode I = 8 or InsCode I = 9 or InsCode I = 10 or InsCode I = 11 or
  InsCode I = 12 or InsCode I = 13 or InsCode I = 14 by SCMPDS_I:8;
 hence thesis;
end;
