theorem
  a <> 0 implies Lege_p(a|^2) = 1
  by Th31,Th33;
