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
108

use crate::integer::Integer;
use crate::natural::logic::not::{limbs_not_in_place, limbs_not_to_out};
use crate::natural::Natural;
use crate::platform::Limb;
use malachite_base::num::arithmetic::traits::WrappingNegAssign;
use malachite_base::slices::{slice_leading_zeros, slice_set_zero};
use std::ops::Neg;

// This is equivalent to `mpn_neg` from `gmp.h`, GMP 6.2.1.
pub(crate) fn limbs_neg(out: &mut [Limb], xs: &[Limb]) -> bool {
    let n = xs.len();
    let zeros = slice_leading_zeros(xs);
    slice_set_zero(&mut out[..zeros]);
    if zeros == n {
        return false;
    }
    out[zeros] = xs[zeros].wrapping_neg();
    let offset = zeros + 1;
    if offset != n {
        limbs_not_to_out(&mut out[offset..], &xs[offset..]);
    }
    true
}

// This is equivalent to `mpn_neg` from `gmp.h`, GMP 6.2.1, where rp == up.
pub(crate) fn limbs_neg_in_place(xs: &mut [Limb]) -> bool {
    let n = xs.len();
    let zeros = slice_leading_zeros(xs);
    if zeros == n {
        return false;
    }
    xs[zeros].wrapping_neg_assign();
    let offset = zeros + 1;
    if offset != n {
        limbs_not_in_place(&mut xs[offset..]);
    }
    true
}

// This is equivalent to `mpn_neg` from `gmp.h`, GMP 6.2.1, where rp != up.
pub(crate) fn limbs_neg_to_out(out: &mut [Limb], xs: &[Limb]) -> bool {
    let n = xs.len();
    let zeros = slice_leading_zeros(xs);
    if zeros == n {
        return false;
    }
    slice_set_zero(&mut out[..zeros]);
    out[zeros] = xs[zeros].wrapping_neg();
    let offset = zeros + 1;
    if offset != n {
        limbs_not_to_out(&mut out[offset..], &xs[offset..]);
    }
    true
}

impl Neg for Natural {
    type Output = Integer;

    /// Negates a [`Natural`], taking it by value and returning an [`Integer`].
    ///
    /// $$
    /// f(x) = -x.
    /// $$
    ///
    /// # Worst-case complexity
    /// Constant time and additional memory.
    ///
    /// # Examples
    /// ```
    /// use malachite_base::num::basic::traits::Zero;
    /// use malachite_nz::natural::Natural;
    ///
    /// assert_eq!(-Natural::ZERO, 0);
    /// assert_eq!(-Natural::from(123u32), -123);
    /// ```
    fn neg(self) -> Integer {
        Integer::from_sign_and_abs(self == 0, self)
    }
}

impl<'a> Neg for &'a Natural {
    type Output = Integer;

    /// Negates a [`Natural`], taking it by reference and returning an [`Integer`].
    ///
    /// $$
    /// f(x) = -x.
    /// $$
    ///
    /// # Worst-case complexity
    /// $T(n) = O(n)$
    ///
    /// $M(n) = O(n)$
    ///
    /// where $T$ is time, $M$ is additional memory, and $n$ is `self.significant_bits()`.
    ///
    /// # Examples
    /// ```
    /// use malachite_base::num::basic::traits::Zero;
    /// use malachite_nz::natural::Natural;
    ///
    /// assert_eq!(-&Natural::ZERO, 0);
    /// assert_eq!(-&Natural::from(123u32), -123);
    /// ```
    fn neg(self) -> Integer {
        Integer::from_sign_and_abs_ref(*self == 0, self)
    }
}