reserve x for set;
reserve i,j for Integer;
reserve n,n1,n2,n3 for Nat;
reserve p for Prime;
reserve a,b,c,d for Element of GF(p);
reserve K for Ring;
reserve a1,a2,a3,a4,a5,a6 for Element of K;

theorem Th24:
  for g2, a be Element of GF(p) st g2 = 2 mod p holds g2*a - a = a
  proof
    let g2, a be Element of GF(p) such that
    A1: g2 = 2 mod p;
    reconsider g1 = 1 mod p as Element of GF(p) by EC_PF_1:14;
    A2: g1 = (2-1) mod p;
    p > 1 by INT_2:def 4;
    then g1 = 1 by NAT_D:63
    .= 1.GF(p) by EC_PF_1:12;
    then g2*a - (1.GF(p))*a = (1.GF(p))*a by A1,A2,Th21;
    hence thesis;
  end;
