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