theorem Th8:
  Mid a,b,a implies a=b
by ANALOAF:def 5;
