i1 : R = CC[x,y]; |
i2 : s = solveSystem {x^2+y^2-1, x*y} o2 = {{2.27367e-16-3.20005e-16*ii, -1}, {-2.28451e-16+4.16282e-16*ii, 1}, {1, ------------------------------------------------------------------------ -1.06085e-15+6.08037e-16*ii}, {-1, 1.06085e-15-6.21915e-16*ii}} o2 : List |
i3 : areEqual(sortSolutions s / coordinates, {{-1, 0}, {0, -1}, {0, 1}, {1, 0}}) o3 = true |