theorem
  half_length(A,B) = half_length(B,A) by EUCLID_6:43;
