"Source: Text/RepThy/GalRep.text";
"Line: 880";
"Date: Tue Jun  7 22:27:15 2016";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/RepThy/GalRep.text, line: 880
// Example: H57E19 ()
print "Example: H57E19";
ei := GetEchoInput();
SetEchoInput(true);
K:=pAdicField(23,20);
R<x>:=PolynomialRing(K);
C:=HyperellipticCurve(-x,x^3+x^2+1);    // genus 2, conductor 23^2
A:=GaloisRepresentation(C); A;
F:=ext<K|2>;
BaseChange(A,F);
GaloisRepresentation(BaseChange(C,F));
SetEchoInput(ei);
