-- -*- M2-comint -*- hash: -1732908762
--loading configuration for package "FourTiTwo" from file /home/tim/.Macaulay2/init-FourTiTwo.m2
--loading configuration for package "Topcom" from file /home/tim/.Macaulay2/init-Topcom.m2
--warning: file katex not installed yet in package Style
--loading configuration for package "NumericalAlgebraicGeometry" from file /home/tim/.Macaulay2/init-NumericalAlgebraicGeometry.m2
--loading configuration for package "Bertini" from file /home/tim/.Macaulay2/init-Bertini.m2

i1 : setRandomSeed 0

o1 = 0

i2 : R = CC[a,b,c,d][x,y];

i3 : polys = polySystem {a*x+b*y^2,c*x*y+d};

i4 : (p0,x0) := createSeedPair polys;

i5 : polys0=specializeSystem(p0,polys);

i6 : apply(polys0,p->sub(p,{x=>first x0.Coordinates,y=>last x0.Coordinates}))

o6 = {-5.55112e-17, -5.55112e-17-1.66533e-16*ii}

o6 : List

i7 : 
