
theorem PCK:
  for p be Prime, k be non zero Nat st k <> p holds (p choose k) mod p = 0
  proof
    let p be Prime, k be non zero Nat such that
    A1: k <> p;
    p divides (p choose k) by A1,NEWTON02:119;
    hence thesis by PEPIN:6;
  end;
