theorem Th87:
  (cos | [.0,PI.]) qua Function * arccos = id [.-1,1.] by COMPTRIG:32
