-- -*- M2-comint -*- {* hash: 831031680 *}

i1 : R = CC[x,y];

i2 : S = {x^2-1,y^2-1};

i3 : T = {x^2+y^2-1, x*y};

i4 : solsS = {(1,-1),(1,1),(-1,1),(-1,-1)};

i5 : track(S,T,solsS) / first 

o5 = {{-3.8337e-16, -1}, {1, 1.17962e-15}, {3.8337e-16, 1}, {-1,
     ------------------------------------------------------------------------
     -1.17962e-15}}

o5 : List

i6 :