let k be natural number ; :: thesis: for N being with_non-empty_elements set
for S being non empty stored-program IC-Ins-separated definite standard-ins standard regular AMI-Struct of NAT ,N
for g being FinPartState of S st S is realistic holds
Start-At ((IC g) + k) c= Relocated g,k

let N be with_non-empty_elements set ; :: thesis: for S being non empty stored-program IC-Ins-separated definite standard-ins standard regular AMI-Struct of NAT ,N
for g being FinPartState of S st S is realistic holds
Start-At ((IC g) + k) c= Relocated g,k

let S be non empty stored-program IC-Ins-separated definite standard-ins standard regular AMI-Struct of NAT ,N; :: thesis: for g being FinPartState of S st S is realistic holds
Start-At ((IC g) + k) c= Relocated g,k

let g be FinPartState of S; :: thesis: ( S is realistic implies Start-At ((IC g) + k) c= Relocated g,k )
assume A1: S is realistic ; :: thesis: Start-At ((IC g) + k) c= Relocated g,k
let x be set ; :: according to RELAT_1:def 3 :: thesis: for b1 being set holds
( not [x,b1] in Start-At ((IC g) + k) or [x,b1] in Relocated g,k )

A2: Start-At ((IC g) + k) = {[(IC S),((IC g) + k)]} by FUNCT_4:87;
A3: IC S in dom (Relocated g,k) by Th51;
A4: IC (Relocated g,k) = (IC g) + k by A1, Th52;
IC (Relocated g,k) = (Relocated g,k) . (IC S) by A3, AMI_1:def 43;
then [(IC S),((IC g) + k)] in Relocated g,k by A3, A4, FUNCT_1:def 4;
hence for b1 being set holds
( not [x,b1] in Start-At ((IC g) + k) or [x,b1] in Relocated g,k ) by A2, TARSKI:def 1; :: thesis: verum