#4839 absarg returns the wrong argument (phase) for tanh of a complex number

[David Scherfgen]

Spotted by Claude:

(%i1) z : tanh(2 + 3*%i)$

(%i2) float(rectform(z));
(%o2) 0.9653858790221331-0.009884375038322492*%i

(%i3) float(rectform(polarform(z)));
(%o3) 0.9654296847315433-0.0036221712255882425*%i

(%o3) is significantly different from (%o2).

[David Scherfgen]

Fixed by commit [d7c1d9].