reserve r,r1,r2, s,x for Real,
  i for Integer;

theorem
  arcsin 0 = 0 by Th69,SIN_COS:31;
