I am trying to take the real part of the a complex expression using
However, the result doesn't come out as expected. The final result still contains
Does anyone have some idea what is going on here?
expr = x + (I*(y + z))/(m + I*n); evar = Variables[expr]; Refine[Re[expr], Element[evar, Reals]]
x - (y + z)*Im[1/(m + I*n)]