Question: Ho to isolate the real part of the equation

Dear Sir / Madam,

Would you recommend me how to isolate the real and imaginary part and simplify the equation A? Maple cannot evaluate this equation to numeric value...

A := evalf(sqrt((Re(B))^2 + (Im(B))^2));
A := evalf(abs(B));

are not working.

I have attached my equation function.txt

Please Wait...