relp-num 0.2.0

Number types for the relp crate
Documentation 
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

macro_rules! test_rational {
    ($t:ident, $test_module_name:ident, $in_t:ident) => {
        #[allow(unused_imports)]
        mod $test_module_name {
            use crate::rational::{Rational8, Rational16, Rational32, Rational64, Rational128, RationalBig};
            use crate::non_zero::NonZero;
            use num_traits;

            use crate::{R8, R16, R32, R64, R128, RB};

            #[test]
            fn field_identities() {
                for i in 1..10 {
                    assert_eq!($t!(0, i), <$in_t as num_traits::Zero>::zero());
                }
                for i in -10..0 {
                    assert_eq!($t!(i, i.unsigned_abs()), -<$in_t as num_traits::One>::one());
                }
                for i in 1..10 {
                    assert_eq!($t!(i, i.unsigned_abs()), <$in_t as num_traits::One>::one());
                }
            }

            #[test]
            fn not_zero() {
                assert!(NonZero::is_not_zero(&<$in_t as num_traits::One>::one()));
            }

            #[test]
            #[should_panic]
            fn panic_divide_zero_by_zero() {
                let _result = $t!(0, 0);
            }

            #[test]
            #[should_panic]
            fn panic_divide_non_zero_by_zero() {
                let _result = $t!(3, 0);
            }

            #[test]
            fn eq() {
                assert_eq!($t!(3, 2), $t!(6, 4));
                assert_eq!($t!(0, 2), $t!(0, 5));
                assert_eq!($t!(0, 2), $t!(0));
            }

            #[test]
            fn add() {
                assert_eq!($t!(3, 2) + $t!(6, 4), $t!(3));
                assert_eq!($t!(0, 2) + $t!(0, 5), $t!(0, 3));

                let mut x = $t!(0);
                for _ in 0..255 {
                    x = x + $t!(1);
                }
                assert_eq!(x, $t!(255));
            }

            #[test]
            fn sub() {
                assert_eq!($t!(3, 2) - $t!(6, 4), $t!(0, 9));
                assert_eq!($t!(0, 2) - $t!(0, 5), $t!(0, 3));
            }

            #[test]
            fn mul() {
                assert_eq!($t!(3, 2) * $t!(6, 4), $t!(9, 4));
                assert_eq!($t!(0, 2) * $t!(0, 5), $t!(0, 3));
            }

            #[test]
            fn div() {
                assert_eq!($t!(3, 2) / $t!(6, 4), <$in_t as num_traits::One>::one());
                assert_eq!($t!(0, 2) / $t!(2, 5), <$in_t as num_traits::Zero>::zero());
            }

            #[test]
            #[should_panic]
            fn div_zero() {
                let _result = $t!(64, 68) / $t!(0, 54);
            }
        }
    };
}

test_rational!(R8, test_8, Rational8);
test_rational!(R16, test_16, Rational16);
test_rational!(R32, test_32, Rational32);
test_rational!(R64, test_64, Rational64);
test_rational!(R128, test_128, Rational128);
test_rational!(RB, test_big, RationalBig);