
theorem
  for x1,y1,x2,y2 be Real holds [**x1,y1**] * [**x2,y2**] = [**x1
