theorem Th6:
  for S being Mem-Struct over N, p being PartState
  of S holds p is data-only iff dom p c= Data-Locations S
by RELAT_1:def 18,XBOOLE_1:86,XBOOLE_1:106;
