theorem Th13:
  exp_R.0 = 1 by SIN_COS:51,def 23;
