test2_1 = TestCase (assertEqual "toDigits" ([1,2,3,4]) (toDigits 1234))
test2_1 = TestCase (assertEqual "toDigits" ([1,2,3,4]) (toDigits 1234))
test2_1 = TestCase (assertEqual "toDigits" ([1,2,3,4]) (toDigits 1234))