plot[ (1-x^.9)^(1/.9), -(1-x^.9)^(1/.9) , {x,-2,2},{y,-2,2} ]