let T be InsType of SCM+FSA; :: thesis: ( T = 0 or T = 1 or T = 2 or T = 3 or T = 4 or T = 5 or T = 6 or T = 7 or T = 8 or T = 9 or T = 10 or T = 11 or T = 12 )
consider y being set such that
A1: [T,y] in proj1 the Instructions of SCM+FSA by RELAT_1:def 4;
consider x being set such that
A2: [[T,y],x] in the Instructions of SCM+FSA by A1, RELAT_1:def 4;
reconsider I = [T,y,x] as Instruction of SCM+FSA by A2;
A3: ( I in SCM-Instr \/ { [J,{},<*c,f,b*>] where J is Element of Segm 13, c, b is Element of SCM+FSA-Data-Loc , f is Element of SCM+FSA-Data*-Loc : J in {9,10} } or I in { [K,{},<*c1,f1*>] where K is Element of Segm 13, c1 is Element of SCM+FSA-Data-Loc , f1 is Element of SCM+FSA-Data*-Loc : K in {11,12} } ) by XBOOLE_0:def 3;

per cases ( I in SCM-Instr or I in { [J,{},<*c,f,b*>] where J is Element of Segm 13, c, b is Element of SCM+FSA-Data-Loc , f is Element of SCM+FSA-Data*-Loc : J in {9,10} } or I in { [K,{},<*c1,f1*>] where K is Element of Segm 13, c1 is Element of SCM+FSA-Data-Loc , f1 is Element of SCM+FSA-Data*-Loc : K in {11,12} } ) by A3, XBOOLE_0:def 3;

suppose I in SCM-Instr ; :: thesis: ( T = 0 or T = 1 or T = 2 or T = 3 or T = 4 or T = 5 or T = 6 or T = 7 or T = 8 or T = 9 or T = 10 or T = 11 or T = 12 )

then reconsider I = I as Instruction of SCM ;
T = InsCode I by RECDEF_2:def 1;
hence ( T = 0 or T = 1 or T = 2 or T = 3 or T = 4 or T = 5 or T = 6 or T = 7 or T = 8 or T = 9 or T = 10 or T = 11 or T = 12 ) by AMI_6:1; :: thesis: verum

end;

suppose I in { [J,{},<*c,f,b*>] where J is Element of Segm 13, c, b is Element of SCM+FSA-Data-Loc , f is Element of SCM+FSA-Data*-Loc : J in {9,10} } ; :: thesis: ( T = 0 or T = 1 or T = 2 or T = 3 or T = 4 or T = 5 or T = 6 or T = 7 or T = 8 or T = 9 or T = 10 or T = 11 or T = 12 )

then ex J being Element of Segm 13 ex c, b being Element of SCM+FSA-Data-Loc ex f being Element of SCM+FSA-Data*-Loc st
( I = [J,{},<*c,f,b*>] & J in {9,10} ) ;
then T in {9,10} by MCART_1:25;
hence ( T = 0 or T = 1 or T = 2 or T = 3 or T = 4 or T = 5 or T = 6 or T = 7 or T = 8 or T = 9 or T = 10 or T = 11 or T = 12 ) by TARSKI:def 2; :: thesis: verum

end;

suppose I in { [K,{},<*c1,f1*>] where K is Element of Segm 13, c1 is Element of SCM+FSA-Data-Loc , f1 is Element of SCM+FSA-Data*-Loc : K in {11,12} } ; :: thesis: ( T = 0 or T = 1 or T = 2 or T = 3 or T = 4 or T = 5 or T = 6 or T = 7 or T = 8 or T = 9 or T = 10 or T = 11 or T = 12 )

then ex K being Element of Segm 13 ex c1 being Element of SCM+FSA-Data-Loc ex f1 being Element of SCM+FSA-Data*-Loc st
( I = [K,{},<*c1,f1*>] & K in {11,12} ) ;
then T in {11,12} by MCART_1:25;
hence ( T = 0 or T = 1 or T = 2 or T = 3 or T = 4 or T = 5 or T = 6 or T = 7 or T = 8 or T = 9 or T = 10 or T = 11 or T = 12 ) by TARSKI:def 2; :: thesis: verum

end;

end;