
theorem
  for a be Real holds cos (PI-a) = - cos a
  proof
    let a be Real;
    cos (PI - a) = cos PI * cos a + sin PI * sin a by SIN_COS:83
    .= - cos a by SIN_COS:77;
    hence thesis;
  end;
