"Source: Text/Basics/FldFin.text";
"Line: 2088";
"Date: Thu Sep 25 14:47:46 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Basics/FldFin.text, line: 2088
// Example: H22E5 ()
print "Example: H22E5";
ei := GetEchoInput();
SetEchoInput(true);
F<z> := FiniteField(7^4);
PrimitiveElement(F);
Log(z);
assert $1 eq 1;
Log(z^2);
assert $1 eq 2;
Log(z + 1);
assert $1 eq 419;
z^419 eq z + 1;
assert $1;
b := z + 1;
b;
Log(b, b);
assert $1 eq 1;
Log(b, z);
assert $1 eq 779;
b^779 eq z;
assert $1;
F<z> := GF(2, 73);
Factorization(#F-1);
PrimitiveElement(F);
time Log(z + 1);
assert $1 eq 4295700317032218908392;
z^4295700317032218908392;
time Log(z + 1);             
assert $1 eq 4295700317032218908392;
time Log(z^2);
assert $1 eq 2;
time Log(z^2134914112412412);
assert $1 eq 2134914112412412;
b := z + 1;
b;
time Log(b, b);
assert $1 eq 1;
time Log(b, z);
assert $1 eq 2260630912967574270198;
b^2260630912967574270198;
SetEchoInput(ei);
