"Source: Text/RepThy/GalRep.text";
"Line: 1545";
"Date: Fri Sep 26 12:10:12 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/RepThy/GalRep.text, line: 1545
// Example: H58E39 ()
print "Example: H58E39";
ei := GetEchoInput();
SetEchoInput(true);
R<x>:=PolynomialRing(Rationals());
K:=NumberField(x^8-6);
GroupName(GaloisGroup(K));
assert exists(A){A: A in ArtinRepresentations(K) | Degree(A) eq 4};
A;
[IsIrreducible(GaloisRepresentation(A,p)): p in PrimesUpTo(10)];
SetEchoInput(ei);
