let N be non empty with_non-empty_elements set ; :: thesis: for S being non empty stored-program IC-Ins-separated definite realistic standard-ins homogeneous regular J/A-independent COM-Struct of N
for g being FinPartState of S
for k being Element of NAT holds ProgramPart (Relocated (g,k)) = Reloc ((ProgramPart g),k)

let S be non empty stored-program IC-Ins-separated definite realistic standard-ins homogeneous regular J/A-independent COM-Struct of N; :: thesis: for g being FinPartState of S
for k being Element of NAT holds ProgramPart (Relocated (g,k)) = Reloc ((ProgramPart g),k)

let g be FinPartState of S; :: thesis: for k being Element of NAT holds ProgramPart (Relocated (g,k)) = Reloc ((ProgramPart g),k)
let k be Element of NAT ; :: thesis: ProgramPart (Relocated (g,k)) = Reloc ((ProgramPart g),k)
thus ProgramPart (Relocated (g,k)) = ((IncrIC ((NPP g),k)) | NAT) +* ((Reloc ((ProgramPart g),k)) | NAT) by FUNCT_4:75
.= {} +* ((Reloc ((ProgramPart g),k)) | NAT) by Def29
.= (Reloc ((ProgramPart g),k)) | NAT by FUNCT_4:21
.= Reloc ((ProgramPart g),k) by RELAT_1:209 ; :: thesis: verum