#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<=)