tests :: [Test]
tests = [
        testGroup "Digits" [
                testProperty "Base 10 Roundtrip" prop_base10_roundtrip,
                testProperty "Base B Roundtrip" prop_baseB_roundtrip
            ]
    ]
tests :: [Test]
tests = [
        testGroup "Digits" [
                testProperty "Base 10 Roundtrip" prop_base10_roundtrip,
                testProperty "Base B Roundtrip" prop_baseB_roundtrip
            ]
    ]
tests = [
        testGroup "Digits" [
                testProperty "Base 10 Roundtrip" prop_base10_roundtrip,
                testProperty "Base B Roundtrip" prop_baseB_roundtrip
            ]
    ]