I forgot:
gcl:
(1) -> log(-2::Complex DFLOAT)
(2) 0.69314718055994529 + 3.1415926535897931 %i
Type: Complex(DoubleFloat)
(2) -> log(complex(-2::DFLOAT, -0))
(2) 0.69314718055994529 + 3.1415926535897931 %i
Type: Complex(DoubleFloat)
sbcl: (but possibly due to private changes)
(1) -> log(complex(-2, 0)$Complex DFLOAT)
1<enter Complex.complex,37 :
arg1= - 2.0
arg2= 0.0
1>exit Complex.complex,37 :
- 2.0
1<enter S-TO-C : (-2.0 . 0.0)
1>exit S-TO-C : #C(-2.0 0.0)
1<enter Complex.real,13 :
arg1= 0.6931471805599453 + 3.141592653589793 %i
1>exit Complex.real,13 :
0.6931471805599453
1<enter Complex.imag,15 :
arg1= 0.6931471805599453 + 3.141592653589793 %i
1>exit Complex.imag,15 :
3.141592653589793
(1) 0.6931471805599453 + 3.141592653589793 %i
Type: Complex(DoubleFloat)
(2) -> log(-2::Complex DFLOAT)
1<enter Complex.real,13 :
arg1= 1.0
1>exit Complex.real,13 :
1.0
1<enter Complex.imag,15 :
arg1= 1.0
1>exit Complex.imag,15 :
0.0
1<enter Complex.complex,37 :
arg1= 2.0
arg2= 0.0
1>exit Complex.complex,37 :
2.0
1<enter Complex.real,13 :
arg1= 2.0
1>exit Complex.real,13 :
2.0
1<enter Complex.imag,15 :
arg1= 2.0
1>exit Complex.imag,15 :
0.0
1<enter Complex.complex,37 :
arg1= - 2.0
arg2= -0.0
1>exit Complex.complex,37 :
- 2.0
1<enter S-TO-C : (-2.0 . -0.0)
1>exit S-TO-C : #C(-2.0 -0.0)
1<enter Complex.real,13 :
arg1= 0.6931471805599453 - 3.141592653589793 %i
1>exit Complex.real,13 :
0.6931471805599453
1<enter Complex.imag,15 :
arg1= 0.6931471805599453 - 3.141592653589793 %i
1>exit Complex.imag,15 :
- 3.141592653589793
(2) 0.6931471805599453 - 3.141592653589793 %i
Type: Complex(DoubleFloat)
I wonder where the -0.0 comes from...
Martin
--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups
"FriCAS - computer algebra system" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at
http://groups.google.com/group/fricas-devel?hl=en
-~----------~----~----~----~------~----~------~--~---
