theorem
  -1 <= r & r <= 1 & arccos r = 0 implies r = 1 by Th91,SIN_COS:31;
