Lines Matching defs:cut
56 (define (round-n-cut n e nb-bits)
63 ;; with the -1 it will only round up if the cut off part is
73 (cut (bit-rshbx (round n) shift))
74 (exact? (=bx n (bit-lshbx cut shift))))
75 (if (<=bx cut max-container)
76 (values cut e exact?)
77 (round-n-cut n (+fx e 1) nb-bits))))
125 (receive (cut e exact?)
126 (round-n-cut n e nb-bits)
129 (v cut)
