let N be non empty with_non-empty_elements set ; :: thesis: for S being non empty stored-program IC-Ins-separated definite realistic COM-Struct of N
for p being PartState of S holds ProgramPart (Initialize p) = ProgramPart p
let S be non empty stored-program IC-Ins-separated definite realistic COM-Struct of N; :: thesis: for p being PartState of S holds ProgramPart (Initialize p) = ProgramPart p
let p be PartState of S; :: thesis: ProgramPart (Initialize p) = ProgramPart p
thus ProgramPart (Initialize p) = (ProgramPart p) +* (ProgramPart (Start-At (0,S))) by FUNCT_4:75
.= (ProgramPart p) +* {} by Th27
.= ProgramPart p by FUNCT_4:22 ; :: thesis: verum