ú΋nNone5With 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.3.0-JpKfZdLFXL756s0rqDvlMV Test.TestCom makeAllTestsmakeAllTestsHere$fShowTestType $fEqTestType$fShowTestUnit $fShowTestTesttestUtestFactualUTestUnittypeOfTargsresult numOfTestsTestTypeNormalOverrideSpec buildTests' makeRandomextractVarsNamegenerateRandomVarsreplaceVarsByValueeith calculatedResactResByTestType buildTestsrunTestsappRec appRecDecgetNamebuilFinalString countRightgetTestT getTestT'isStartingWith replaceXbyYparenC