reserve MS for non empty MidStr;
reserve a, b for Element of MS;
reserve M for MidSp;
reserve a,b,c,d,a9,b9,c9,d9,x,y,x9 for Element of M;
reserve p,q,r,p9,q9 for Element of [:the carrier of M,the carrier of M:];
reserve u,v,w,u9,w9 for Vector of M;

theorem Th34:
  ex b st u = [a,b]~
proof
  consider p such that
A1: u = p~ by Def7;
  consider b such that
A2: p`1,p`2 @@ a,b by Th15;
  [p`1,p`2] ## [a,b] by A2;
  then p ## [a,b];
  then p~ = [a,b]~ by Th27;
  hence thesis by A1;
end;
