Reduce Inequality

How can I reduce the inequality in terms of modulus of alpha.

Reduce[Abs[-((-1 + Sqrt[ 1 + 4 α] + α (-3 + Sqrt[1 + 4 α]) +
Sqrt[ 2 – 2 Sqrt[1 + 4 α] + 2 α (-2 + 4 Sqrt[1 + 4 α] +
α (-11 + 2 α + Sqrt[ 1 + 4 α]))])/(2 (-1 – 2 α + Sqrt[1 + 4 α])))] < 1] ================= 1   Please provide your expression as Mathematica code. What have you tried already? – MarcoB Jul 6 '15 at 16:39      This is your fourth question and you never posted a single line in the Mathematica language. Please stop posting just TeX and formulas. – Dr. belisarius Jul 6 '15 at 17:02      Please edit your question and add the code there. Thank you. – Dr. belisarius Jul 6 '15 at 17:05 ================= 1 Answer 1 ================= For Reals f[α_]:= -((-1 + Sqrt[1 + 4 α] + α (-3 + Sqrt[1 + 4 α]) + Sqrt[2 - 2 Sqrt[1 + 4 α] + 2 α (-2 + 4 Sqrt[1 + 4 α] + α (-11 + 2 α + Sqrt[1 + 4 α]))])/(2 (-1 - 2 α + Sqrt[1 + 4 α]))) Reduce[-1 < f[α] < 1, α] (* Root[-4 + 20 #1 - 12 #1^2 + #1^3 &, 2] <= α < 2 *) For Complexes (still working on it) RegionPlot[Abs@f[x + I y] < 1, {x, -10, 10}, {y, -10, 10}]      What about for Complex case? – Sk Sarif Hassan Jul 6 '15 at 17:24      Root[-4 + 20 #1 - 12 #1^2 + #1^3 &, 2] <= α < 2 What is this? I do not understand the equation with # symbo. Can you please tell me what is the equation of which Roots should be less than equal to 2 alpha. – Sk Sarif Hassan Jul 6 '15 at 17:30      @SkSarifHassan You could check the docs for Root[ ] or search for questions in this site involving about it. In any case, if feel too lazy to do that try Root[-4 + 20 #1 - 12 #1^2 + #1^3 &, 2] //N – Dr. belisarius Jul 6 '15 at 17:34      Thanks a lot. I am not lazy really. I do not know these. – Sk Sarif Hassan Jul 6 '15 at 17:36 1   @SkSarifHassan ToRadicals (sometimes combined with ComplexExpand) may also make Root values (at least simpler ones with closed form) more understandable. For instance, try Root[-4 + 20 #1 - 12 #1^2 + #1^3 &, 2] // ToRadicals // ComplexExpand. This may be good for the end user; if you plan to feed these results back to Mathematica, don't perform such transitions for no apparent reasons. Mma likes Roots. – kirma Jul 6 '15 at 18:16