Lines Matching refs:tru
47 (multiple-value-bind (tru rem) (truncate number divisor)
49 (values tru rem)
52 (and (= rem thresh) (oddp tru)))
54 (values (- tru 1) (+ rem divisor))
55 (values (+ tru 1) (- rem divisor))))
58 (and (= rem -thresh) (oddp tru))))
60 (values (+ tru 1) (- rem divisor))
61 (values (- tru 1) (+ rem divisor))))
62 (t (values tru rem)))))))
66 (multiple-value-bind (tru rem) (ftruncate number divisor)
71 (values (1- tru) (+ rem divisor))
72 (values tru rem))))
76 (multiple-value-bind (tru rem) (ftruncate number divisor)
81 (values (+ tru 1) (- rem divisor))
82 (values tru rem))))