splitOnTest2 = TestCase (do
    let (a,b) = splitOn ' ' "abcd efgh"
    assertEqual "Spliton Test1 failed" ("abcd", "efgh") (a, b)
    )
splitOnTest2 = TestCase (do
    let (a,b) = splitOn ' ' "abcd efgh"
    assertEqual "Spliton Test1 failed" ("abcd", "efgh") (a, b)
    )
splitOnTest2 = TestCase (do
    let (a,b) = splitOn ' ' "abcd efgh"
    assertEqual "Spliton Test1 failed" ("abcd", "efgh") (a, b)
    )