11 lines
217 B
Scheme
11 lines
217 B
Scheme
#lang scheme/base
|
|
(require '#%flfxnum)
|
|
|
|
(provide fx->fl
|
|
fxabs
|
|
fx+ fx- fx*
|
|
fxquotient fxremainder
|
|
fxand fxior fxxor
|
|
fxnot fxrshift fxlshift
|
|
fx>= fx> fx= fx< fx<=)
|