theorem Th35:
  for p be Prime, a, b be Element of GF(p),
  P be Element of EC_SetProjCo(a,b,p) holds
  ((P`2_3) |^2)*(P`3_3) - ((P`1_3) |^3 +
    a*(P`1_3)*(P`3_3) |^2 + b*(P`3_3) |^3) = 0.GF(p)
  proof
    let p be Prime, a, b be Element of GF(p),
    P be Element of EC_SetProjCo(a,b,p);
    consider PP be Element of ProjCo(GF(p)) such that
    A1: PP = P & PP in EC_SetProjCo(a,b,p);
    A2: PP`1_3 = P`1_3 & PP`2_3 = P`2_3 & PP`3_3 = P`3_3 by A1,Th32;
    P is_on_curve EC_WEqProjCo(a,b,p) by Th34;
    hence thesis by A2,EC_PF_1:def 8,A1;
  end;
