Does somebody know how to convert
{1/2 < k6,
k6 <= Root[{-6 + #^2& , \
(-9) # - 90 #2 + 8 # #2^2 + 204 #2^3 + 64 # #2^4 + 40 #2^5& }, {2, 2}]
}
to
{1/2 < k6 &&
k6 <= Root[{-6 + #^2& , \
(-9) # - 90 #2 + 8 # #2^2 + 204 #2^3 + 64 # #2^4 + 40 #2^5& }, {2, 2}]
}
I tried replacements with the rule `{List->And}`. However, with `ReplaceAll` that ruins the `Root` object. With `Replace` I tried various possibilities for level specifications and they never change the expression, so I am not sure what I am missing.