I would like to know if there is any way to coax maple into spitting out the solution (1,1,1) for the system of equations {x²+y²+z²=3, x+y+z=3}. So far all I have come up with is

with(RegularChains)[SemiAlgebraicSetTools]:
R:=PolynomialRing([x,y,z]);
Display(SamplePoints([x^2+y^2+z^2=3,x+y+z=3],R),R);

This produces

x=1
y=1
z=1

as desired, but I would like to accomplish this without specifying the polynomial...