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 s being State of S holds dom (DataPart s) = Data-Locations S

let S be non empty stored-program IC-Ins-separated definite realistic COM-Struct of N; :: thesis: for s being State of S holds dom (DataPart s) = Data-Locations S
let s be State of S; :: thesis: dom (DataPart s) = Data-Locations S
Data-Locations S c= dom s by Th49;
hence dom (DataPart s) = Data-Locations S by RELAT_1:91; :: thesis: verum