use crate::Float;
use crate::InnerFloat::{Finite, Infinity, NaN, Zero};
use crate::test_util::common::rug_float_significant_bits;
use core::cmp::Ordering::{self, *};
use malachite_base::num::arithmetic::traits::NegAssign;
use malachite_base::num::conversion::traits::ExactFrom;
use malachite_base::rounding_modes::RoundingMode::{self, *};
use malachite_q::Rational;
use rug::float::Round;
use rug::ops::AssignRound;
use std::cmp::max;
pub fn div_prec_round_naive(x: Float, y: Float, prec: u64, rm: RoundingMode) -> (Float, Ordering) {
assert_ne!(prec, 0);
match (x, y) {
(float_nan!(), _)
| (_, float_nan!())
| (float_either_infinity!(), float_either_infinity!())
| (float_either_zero!(), float_either_zero!()) => (float_nan!(), Equal),
(
Float(Infinity { sign: x_sign }),
Float(Finite { sign: y_sign, .. } | Zero { sign: y_sign }),
)
| (Float(Finite { sign: x_sign, .. }), Float(Zero { sign: y_sign })) => (
Float(Infinity {
sign: x_sign == y_sign,
}),
Equal,
),
(
Float(Zero { sign: x_sign }),
Float(Finite { sign: y_sign, .. } | Infinity { sign: y_sign }),
)
| (Float(Finite { sign: x_sign, .. }), Float(Infinity { sign: y_sign })) => (
Float(Zero {
sign: x_sign == y_sign,
}),
Equal,
),
(x, y) => {
let (mut quotient, o) = Float::from_rational_prec_round(
Rational::exact_from(x) / Rational::exact_from(y),
prec,
rm,
);
if rm == Floor && o == Equal && quotient == 0u32 {
quotient.neg_assign();
}
(quotient, o)
}
}
}
pub fn rug_div_prec_round(
x: &rug::Float,
y: &rug::Float,
prec: u64,
rm: Round,
) -> (rug::Float, Ordering) {
let mut quotient = rug::Float::with_val(u32::exact_from(prec), 0);
let o = quotient.assign_round(x / y, rm);
(quotient, o)
}
#[inline]
pub fn rug_div_round(x: &rug::Float, y: &rug::Float, rm: Round) -> (rug::Float, Ordering) {
rug_div_prec_round(
x,
y,
max(rug_float_significant_bits(x), rug_float_significant_bits(y)),
rm,
)
}
#[inline]
pub fn rug_div_prec(x: &rug::Float, y: &rug::Float, prec: u64) -> (rug::Float, Ordering) {
rug_div_prec_round(x, y, prec, Round::Nearest)
}
pub fn rug_div(x: &rug::Float, y: &rug::Float) -> rug::Float {
rug_div_prec_round(
x,
y,
max(rug_float_significant_bits(x), rug_float_significant_bits(y)),
Round::Nearest,
)
.0
}
pub fn rug_div_rational_prec_round(
x: &rug::Float,
y: &rug::Rational,
prec: u64,
rm: Round,
) -> (rug::Float, Ordering) {
let mut quotient = rug::Float::with_val(u32::exact_from(prec), 0);
let o = quotient.assign_round(x / y, rm);
(quotient, o)
}
pub fn rug_div_rational_round(
x: &rug::Float,
y: &rug::Rational,
rm: Round,
) -> (rug::Float, Ordering) {
rug_div_rational_prec_round(x, y, rug_float_significant_bits(x), rm)
}
pub fn rug_div_rational_prec(
x: &rug::Float,
y: &rug::Rational,
prec: u64,
) -> (rug::Float, Ordering) {
rug_div_rational_prec_round(x, y, prec, Round::Nearest)
}
pub fn rug_div_rational(x: &rug::Float, y: &rug::Rational) -> rug::Float {
rug_div_rational_prec_round(x, y, rug_float_significant_bits(x), Round::Nearest).0
}
pub fn rug_rational_div_float_prec_round(
x: &rug::Rational,
y: &rug::Float,
prec: u64,
rm: Round,
) -> (rug::Float, Ordering) {
let mut quotient = rug::Float::with_val(u32::exact_from(prec), 0);
let o = quotient.assign_round(x / y, rm);
(quotient, o)
}
pub fn rug_rational_div_float_round(
x: &rug::Rational,
y: &rug::Float,
rm: Round,
) -> (rug::Float, Ordering) {
rug_rational_div_float_prec_round(x, y, rug_float_significant_bits(y), rm)
}
pub fn rug_rational_div_float_prec(
x: &rug::Rational,
y: &rug::Float,
prec: u64,
) -> (rug::Float, Ordering) {
rug_rational_div_float_prec_round(x, y, prec, Round::Nearest)
}
pub fn rug_rational_div_float(x: &rug::Rational, y: &rug::Float) -> rug::Float {
rug_rational_div_float_prec_round(x, y, rug_float_significant_bits(y), Round::Nearest).0
}