General refactor for legibility

Priming to update all source to lhs and document extensively

test/Spec.hs

@@ -31,7 +31,6 @@ tests = testGroup "Tricu Tests"
   , lambdaEvalTests
   , libraryTests
   , fileEvaluationTests
-  , propertyTests
   ]
 
 lexerTests :: TestTree
@@ -414,13 +413,3 @@ fileEvaluationTests = testGroup "Evaluation tests"
       res <- liftIO $ evaluateFileWithContext library "./test/string.tri"
       decodeResult (result res) @?= "\"String test!\""
   ]
-
-propertyTests :: TestTree
-propertyTests = testGroup "Property Tests"
-  [ testProperty "Lexing and parsing round-trip" $ \input ->
-      case runParser tricuLexer "" input of
-        Left _ -> property True
-        Right tokens -> case runParser parseExpression "" tokens of
-          Left _ -> property True
-          Right ast -> parseSingle input === ast
-  ]