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 = {{-4.40616e-16, -1}, {1, 1.22819e-15}, {4.40616e-16, 1}, {-1, ------------------------------------------------------------------------ -1.22819e-15}} o5 : List |