1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107
// Copyright © 2024 Mikhail Hogrefe
//
// This file is part of Malachite.
//
// Malachite is free software: you can redistribute it and/or modify it under the terms of the GNU
// Lesser General Public License (LGPL) as published by the Free Software Foundation; either version
// 3 of the License, or (at your option) any later version. See <https://www.gnu.org/licenses/>.
use crate::Float;
use crate::InnerFloat::{Finite, Infinity, NaN, Zero};
use core::cmp::Ordering::{self, *};
use malachite_base::num::arithmetic::traits::Sign;
use malachite_base::num::basic::floats::PrimitiveFloat;
use malachite_nz::natural::Natural;
fn float_partial_cmp_primitive_float<T: PrimitiveFloat>(x: &Float, y: &T) -> Option<Ordering> {
match (x, y) {
(float_nan!(), _) => None,
(_, y) if y.is_nan() => None,
(float_infinity!(), y) if *y == T::INFINITY => Some(Equal),
(float_negative_infinity!(), y) if *y == T::NEGATIVE_INFINITY => Some(Equal),
(float_infinity!(), _) => Some(Greater),
(float_negative_infinity!(), _) => Some(Less),
(_, y) if *y == T::NEGATIVE_INFINITY => Some(Greater),
(_, y) if *y == T::INFINITY => Some(Less),
(float_either_zero!(), y) => Some(if *y == T::ZERO {
Equal
} else if y.is_sign_positive() {
Less
} else {
Greater
}),
(x, y) if *y == T::ZERO => Some(x.sign()),
(
Float(Finite {
sign: s_x,
exponent: e_x,
significand: m_x,
..
}),
y,
) => {
let s_y = y.is_sign_positive();
Some(s_x.cmp(&s_y).then_with(|| {
let abs_cmp = (e_x - 1)
.cmp(&y.sci_exponent())
.then_with(|| m_x.cmp_normalized(&Natural::from(y.integer_mantissa())));
if *s_x {
abs_cmp
} else {
abs_cmp.reverse()
}
}))
}
}
}
macro_rules! impl_partial_cmp_primitive_float {
($t: ident) => {
impl PartialOrd<$t> for Float {
/// Compares a [`Float`] to a primitive float.
///
/// The [`Float`] NaN is not comparable to any primitive float, not even the primitive
/// float NaN. Every [`Float`] zero is equal to every primitive float zero, regardless
/// of sign.
///
/// # Worst-case complexity
/// $T(n) = O(n)$
///
/// $M(n) = O(1)$
///
/// where $T$ is time, $M$ is additional memory, and $n$ is
/// `max(self.significant_bits(), other.sci_exponent().abs())`.
///
/// # Examples
/// See [here](super::partial_cmp_primitive_float#partial_cmp).
#[inline]
fn partial_cmp(&self, other: &$t) -> Option<Ordering> {
float_partial_cmp_primitive_float(self, other)
}
}
impl PartialOrd<Float> for $t {
/// Compares a primitive float to a [`Float`].
///
/// The primitive float NaN is not comparable to any primitive float, not even the
/// [`Float`] NaN. Every primitive float zero is equal to every [`Float`] zero,
/// regardless of sign.
///
/// # Worst-case complexity
/// $T(n) = O(n)$
///
/// $M(n) = O(1)$
///
/// where $T$ is time, $M$ is additional memory, and $n$ is
/// `max(self.significant_bits(), other.sci_exponent().abs())`.
///
/// # Examples
/// See [here](super::partial_cmp_primitive_float#partial_cmp).
#[inline]
fn partial_cmp(&self, other: &Float) -> Option<Ordering> {
other.partial_cmp(self).map(Ordering::reverse)
}
}
};
}
apply_to_primitive_floats!(impl_partial_cmp_primitive_float);