tests = TestList [TestLabel "Parsing input" parse_input_test,
                    TestLabel "All input label" label_all_test]
tests = TestList [TestLabel "Parsing input" parse_input_test,
                    TestLabel "All input label" label_all_test]
tests = TestList [TestLabel "Parsing input" parse_input_test,
                    TestLabel "All input label" label_all_test]