"Source: Text/Ring/Newton.text";
"Line: 460";
"Date: Wed Jul 21 12:12:20 2021";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Ring/Newton.text, line: 460
// Example: H55E3 ()
print "Example: H55E3";
ei := GetEchoInput();
SetEchoInput(true);
N2 := NewtonPolygon({<2, 0>, <0, 3>, <4, 1>});
N6 := NewtonPolygon({<1, 4>, <1, 6>, <2, 4>, <3, 1>, <6, 1>, <5, 2>, <4, 5>,
<4, 7>, <6, 6>, <7, 7>, <2, 7>, <5, 9>, <8, 4>, <8, 6>, <8, 8>, <7, 9>});
InnerVertices(N2);
N2;
InnerVertices(N6);
N6;
Vertices(N2);
Vertices(N6);
AllVertices(N2);
N2;
AllVertices(N6);
N6;             
OuterVertices(N6);
OuterVertices(N2);
SetEchoInput(ei);
