Exact, inexact, and mixed complex number representations, where inexact and mixed numbers that are = are nevertheless distinct in the sense of eqv?: Gambit, Kawa, Chibi. (Also CLISP, Pure.)
Exact, inexact, and mixed complex number representations, where inexact and mixed numbers that are = are the same in the sense of eqv?: MIT, STklos.
Exact and inexact complex number representations only (mixed complex numbers become inexact): Racket, Chicken 4 with the numbers egg, Chicken 5, Scheme48/scsh, Kawa, Chez, Vicare, Larceny, Ypsilon, IronScheme, Spark, Wraith, Sagittarius. (Also ABCL, Allegro CL, Clozure CL, CMUCL, ECL, GNU CL, LispWorks, SBCL, Scieneer CL.)
Inexact complex number representations only: Gauche, Guile, SISC, SCM, KSi, S7, UMB, Stalin, Cyclone. (Also Fortran, C/C++, Python, etc.)
Exact complex number representations only: Owl Lisp (which has no inexact numbers).
No complex numbers: plain Chicken 4, Bigloo, Ikarus, NexJ, SigScheme, Shoe, TinyScheme, Scheme 9, Dream, RScheme, BDC, XLisp, Rep, Schemik, Elk, VX, Oaklisp, Llava, SXM, Sizzle, FemtoLisp, Dfsch, Inlab.
Mosh has a bug whereby numbers that are = are always eqv? even if they differ in exactness; it supports exact, inexact, and mixed complex number representations, but doesn't differentiate exact from inexact properly.
The value of (imag-part 2.0) is exact 0: Racket, MIT, Gambit, plain Chicken, Guile, Kawa, Chez, Vicare, Larceny, Ypsilon, Mosh, IronScheme, STklos, RScheme (but see below), Sizzle, Spark, Chibi.
The value of (imag-part 2.0) is inexact 0.0: Gauche, Chicken with the numbers egg, Scheme48/scsh, SISC, SCM, KSi, S7, UMB, SXM.
No imag-part procedure: Bigloo, NexJ, Shoe, TinyScheme, Scheme 9, BDC, XLisp, Rep, Schemik, Elk, VX, Llava, FemtoLisp, Dfsch, Inlab.
No inexact numbers: SigScheme, Dream, Oaklisp, Owl Lisp.
Integrating both sets of results, this means that Racket, Guile, Chez, Vicare, Larceny, Ypsilon, IronScheme, Spark behave as if they supported mixed-exactness complex numbers in the case where the real part is inexact and the imaginary part is exact 0, even though they do not support mixed-exactness complex numbers otherwise.
Schemes that don't support non-real numbers can still fake support for real-part and imag-part by having the former return its argument and the latter return zero. As usual, some do and some don't:
Fake support: plain Chicken, RScheme
No support: Shoe, TinyScheme, BDC, XLisp, Sizzle, Bigloo, Scheme 9, Elk, Rep, Owl Lisp
All R6RS systems behave the same way, returning 0.0 in the first case and 0 in the second.
Chicken 4 with the numbers egg, Chicken 5, and Scheme 48 return 0.0 in both cases.
Gambit, MIT, Chibi, and STklos return 0 in both cases.
All other systems lack support for either exact or inexact complex numbers or both.
If the imaginary part of a number is an inexact zero, is it still complex, or is it real?
The following expressions were evaluated in different systems:
1+0.0i
(= 1+0.0i 1)
(real? 1+0.0i)
(exact? 1+0.0i)Interestingly, the output is quite diverse. Some implementations will
coerce the whole number into inexact; others will disregard the inexact
0.0 and treat it as a real; others will even keep it complex, but will
answer true when it is compared to exact 1.
| System | 1+0.0i |
(= 1+0.0i 1) | (real? 1+0.0i) | (exact? 1+0.0i) |
|---|---|---|---|---|
| Chez | 1.0+0.0i | #t | #f | #f |
| Chibi | 1+0.0i | #t | #f | #f |
| Chicken | 1.0 | #t | #t | #f |
| Cyclone | 1.0+0.0i | #f | #t | #f |
| Foment | 1.0+0.0i | #t | #f | #f |
| Gabmit | 1+0.0i | #t | #f | #f |
| Gauche | 1.0 | #t | #t | #f |
| Kawa | 1 | #t | #f | #f |
| Lips | 1+0.0i | #t | #f | #f |
| Loko | 1.0+0.0i | #f | #f | #f |
| MIT | 1+0.0i | #t | #t | #f |
| Racket | 1.0+0.0i | #t | #f | #f |
| Sagittarius | 1.0+0.0i | #t | #f | #f |
| Stklos | 1 | #t | #t | #t |
| Unsyntax | 1+0.0i | #t | #f | #f |
| Ypsilon | 1.0+0.0i | #t | #f | #f |
See also: Numeric tower.