def rm_qr
import bend-collections@1.0.0.0/src/math/f64.bend as F64import Base
import bend-collections@1.0.0.0/src/math/u64.bend as W
1120def rm_qr(+x: F64, +y: F64, p: W.U64 & W.U64) -> F64:
1121 (+q, +r) = p
1122 rm_fix(signbit(x), dexp(y), dmant(y), r, q)