Re: Not bad, Tom! But... Message #14 Posted by Valentin Albillo on 11 Nov 2003, 10:44 a.m., in response to message #13 by Nelson M. Sicuro (Brazil)
Nelson posted:
"The only 'complex' function is the one that you can enter a complex number, like the I on the 15C, using a complex stack (full 4 entry)..."
The HP71B/Math ROM also does it quite well:
COMPLEX Z, V
Z = (2,3)*(4,5)/(6,7) + SIN((1,1))  EXP((2,5)^(3,2))
V = SQR(Z) + SINH(Z) * LOG(Z)/TANH(Z)  ABS(Z)
PRINT POLAR(Z), RECT(Z), CONJ(Z), PROJ(Z)
COMPLEX SHORT A(10,10), B(10,10)
MAT A = ((2,5))
MAT B = A*A
MAT PRINT USING 'C(2D.D,2D.D,"i")'; A
COMPLEX X(40,40), Y(40,40), Z(40,40)
MAT X = SYS(Y,Z)
IF Z # (0,0) THEN CALL XREFINE(Z, (1E5, 1E5)) ELSE 'DONE'
DESTROY ALL @ OPTION BASE 1 @ DIM P(6) @ COMPLEX R(5)
MAT INPUT P
MAT R=PROOT(P)
MAT DISP R
By the way, "complex stack (full 4 entry)" should be " ... plus complex LastX"
Best regards from V.
