Numeric Constants and Convert Functions in Scheme

gistfile1.scm

;;;
;;; 無限大と NaN
;;;
(define negative-infinity (log 0.0))
(define positive-infinity (- negative-infinity))
(define NaN               (+ positive-infinity negative-infinity))

;;;
;;; 数値の変換
;;;
(floor    -3.6)     ; => -4.0   繰り下げ
(ceil     -3.6)     ; => -3.0   繰り上げ　
(truncate -3.6)     ; => -3.0   切り捨て
(round    -3.6)     ; => -4.0   偶数丸め

(real-part 3+4i)    ; => 3      実部
(imag-part 3+4i)    ; => 4      虚部