let N be non empty with_non-empty_elements set ; :: thesis: for S being non empty IC-Ins-separated COM-Struct of N
for s being State of S holds dom (DataPart s) = Data-Locations S

let S be non empty IC-Ins-separated 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 Th13;
hence dom (DataPart s) = Data-Locations S by RELAT_1:91; :: thesis: verum