((/nonstd/rtl/rel1/lib3/float.lisp::fl (nil nil nil (floor) nil nil nil) ((x) (1) nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/rtl/rel1/lib3/float.lisp::bits (nil nil (fl) nil nil nil nil) (nil nil nil (/) nil nil nil) (nil nil nil (rem expt) nil nil nil) ((x j) (2) nil (expt) nil nil nil) (nil (2) (1+) nil nil nil nil) ((i) nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/rtl/rel1/lib3/float.lisp::expo1 (nil nil nil nil (if) nil nil) (nil (0) (1-) nil (and) nil nil) (nil nil (rationalp recursive-call) (< <) nil nil nil) ((x x x) (0 1) nil (*) nil nil nil) ((x) (2) nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/rtl/rel1/lib3/float.lisp::expo2 (nil nil nil nil (if) nil nil) (nil (0) (1+) (and) nil nil nil) (nil nil (rationalp recursive-call) (>=) nil nil nil) ((x x) (2) nil (/) nil nil nil) ((x) (2) nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/rtl/rel1/lib3/float.lisp::expo (nil nil nil nil (cond) nil nil) (nil nil ((not (rationalp x)) (>= (abs x) 1) t) nil nil nil nil) (nil (0) (expo2 expo1) nil nil nil nil) (nil nil (abs abs) nil nil nil nil) ((x x) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/rtl/rel1/lib3/float.lisp::sgn (nil nil nil nil (if) nil nil) (nil (0) nil (=) (if) nil nil) ((x) (0 -1 1) nil (<) nil nil nil) ((x) (0) nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/rtl/rel1/lib3/float.lisp::sig (nil nil nil nil (if) nil nil) (nil (0) (rationalp) nil (if) nil nil) ((x) nil (-) (< *) nil nil nil) ((x x) (0) nil (* expt) nil nil nil) ((x) (2) (-) (expt) nil nil nil) (nil (2) (- expo) nil nil nil nil) ((x) nil (expo) nil nil nil nil)) (/nonstd/rtl/rel1/lib3/float.lisp::exactp (nil nil (integerp) nil nil nil nil) (nil nil nil (*) nil nil nil) (nil nil (sig) (expt) nil nil nil) ((x) (2) (1-) nil nil nil nil) ((n) nil nil nil nil nil nil) (nil nil nil nil nil nil nil) (nil nil nil nil nil nil nil)) (/nonstd/rtl/rel1/lib3/float.lisp::fp+ (nil nil nil (+) nil nil nil) ((x) nil nil (expt) nil nil nil) (nil (2) nil (-) nil nil nil) ((n) nil (1+) nil nil nil nil) (nil nil (expo) nil nil nil nil) ((x) nil nil nil nil nil nil) (nil nil nil nil nil nil nil)))