Selection of roots

I wonder how it is done in Axiom the selection of roots of a polynomial 
with some property. As in this example, select the positive roots out of 
the list of three roots generated by:

radicalSolve(p^3-p+1/10=0,p)

Alejandro Jakubi