• The function solve(T)  calls the black-box solver in PHCpack in order to solve the target system T .

>	with(phc): setPHCloc("C:\\PHCmaple"):

>	T := makeSystem([x,y,z], [], [x^2-2*x*z+5,x*y^2+y*z,3*y^2-8*z^2]):

>	T:-vars; T:-polys;

>	solutions := solve(T):

>	printSolutions(T,solutions):

(1) [x = .758992327488660e-10-2.23606797697157*I, y = .226759888535263e-9+.743999115625533e-10*I, z = .758992327488660e-10+.528217311456491e-9*I]

(2) [x = -.758992327488660e-10+2.23606797697157*I, y = .226759888535263e-9+.743999115625533e-10*I, z = -.758992327488660e-10-.528217311456491e-9*I]

>	map(s->s:-coords, solutions);

phc , phc[solve] , phc[track] , phc[embed] , phc[drawPaths]