let p be FinPartState of ; for k being Element of NAT holds Start-At ((IC p) + k) c= Relocated p,k
let k be Element of NAT ; Start-At ((IC p) + k) c= Relocated p,k
A1:
IC (Relocated p,k) = (IC p) + k
by Th26;
A2:
IC SCM in dom (Relocated p,k)
by Th25;
then
IC (Relocated p,k) = (Relocated p,k) . (IC SCM )
by AMI_1:def 43;
then A3:
( Start-At ((IC p) + k) = {[(IC SCM ),((IC p) + k)]} & [(IC SCM ),((IC p) + k)] in Relocated p,k )
by A2, A1, FUNCT_1:def 4, FUNCT_4:87;
thus
Start-At ((IC p) + k) c= Relocated p,k
verum