None5With a path like some/Path/File.hs, Create a function &_TEST_some_Path_File :: (String,Bool) Kwith the string containing the result of all tests, and the boolean set to True if and only if all tests passedGThis also create sub-functions that each produce a Eihter String String       $testCom-0.1.0-EdVulsU0qXAKmo3vmDZQHI Test.TestCom makeAllTestsmakeAllTestsHere $fShowTestTTestT valueTestresTesttestFactualU buildTests' buildTestsrunTestsappRec appRecDecgetNamebuilFinalString countRightgetTestT getTestT' replaceXbyY