reserve X for set;
reserve a,b,c,k,m,n for Nat;
reserve i for Integer;
reserve r for Real;
reserve p for Prime;

theorem Th18:
  for r being Complex holds Sum OddEvenPowers(r,1) = 1
  proof
    let r be Complex;
    OddEvenPowers(r,1) = <*1*> by Th17;
    hence thesis by RVSUM_1:73;
  end;
