theorem
  for D being non empty a_partition of X, p being Element of D
  holds p = proj D " {p}
proof
  let D be non empty a_partition of X, p be Element of D;
  thus p c= proj D " {p}
  proof
    let e be object;
    assume
A1: e in p;
    then (proj D).e = p by Th65;
    then (proj D).e in {p} by TARSKI:def 1;
    hence thesis by A1,FUNCT_2:38;
  end;
  let e be object;
  assume
A2: e in proj D " {p};
  then (proj D).e in {p} by FUNCT_1:def 7;
  then (proj D).e = p by TARSKI:def 1;
  hence e in p by A2,Def9;
end;
