reserve x,y,z for set,
  k for Element of NAT;
reserve J,J1,K for Element of Segm 13,
  a for Element of NAT,
  b,b1,b2,c,c1,c2 for Element of SCM-Data-Loc,
  f,f1,f2 for Element of SCM+FSA-Data*-Loc;
reserve T for InsType of SCM+FSA-Instr;

theorem Th9:
  T = 11 or T = 12 implies JumpParts T = {{}}
proof
  assume
A1: T = 11 or T = 12;
   then
A2:  not(T = 0 or ... or T = 8);
  hereby
    let x be object;
    assume x in JumpParts T;
     then consider I being Element of SCM+FSA-Instr such that
A3:   x = JumpPart I and
A4:  InsCode I = T;
     I in { [K,{},<*c1,f1*>]
      where K is Element of Segm 13, c1 is Element of SCM-Data-Loc,
       f1 is Element of SCM+FSA-Data*-Loc
      : K in {11,12} } by A1,A4,Th7,A2;
     then consider K being Element of Segm 13,
       c1 being Element of SCM-Data-Loc,
       f1 being Element of SCM+FSA-Data*-Loc
     such that
A5:   I = [K,{},<*c1,f1*>] & K in {11,12};
     x = {} by A3,A5;
    hence x in {{}} by TARSKI:def 1;
  end;
  set a = the Element of SCM-Data-Loc, f = the Element of SCM+FSA-Data*-Loc;
  let x be object;
   T in {11,12} by A1,TARSKI:def 2;
   then
A6: [T,{},<*a,f*>] in SCM+FSA-Instr by Th5;
  assume x in {{}};
   then x = {} by TARSKI:def 1;
   then
A7:  x = JumpPart[T,{},<*a,f*>];
    InsCode[T,{},<*a,f*>] = T;
  hence thesis by A7,A6;
end;
