let N be with_zero set ; :: thesis: for S being non empty with_non-empty_values IC-Ins-separated Mem-Struct over N
for p being non empty PartState of S holds dom p meets {(IC )} \/ (Data-Locations )
let S be non empty with_non-empty_values IC-Ins-separated Mem-Struct over N; :: thesis: for p being non empty PartState of S holds dom p meets {(IC )} \/ (Data-Locations )
let p be non empty PartState of S; :: thesis: dom p meets {(IC )} \/ (Data-Locations )
dom p c= the carrier of S by RELAT_1:def 18;
then dom p meets the carrier of S by XBOOLE_1:69;
hence dom p meets {(IC )} \/ (Data-Locations ) by STRUCT_0:4; :: thesis: verum