Ergonomic language features and lib cleanup

+ let bindings
+ where bindings
+ do notation

I explored enough of the alternative language design space and decided
that we should commit fully to Lambda style. That means no more highly
tacit/concatenative point-free/partial programs as default. We'll keep
taking advantage of those capabilities when it makes sense, but the
library will continue to see massive overhauls.

src/ContentStore.hs

@@ -9,6 +9,7 @@ import Data.List                      (nub, sort)
 import Data.Maybe                     (catMaybes, fromMaybe)
 import Data.Text                      (Text)
 import Database.SQLite.Simple
+import System.IO (hPutStrLn, stderr)
 import System.Directory               (createDirectoryIfMissing, getXdgDirectory, XdgDirectory(..))
 import System.Environment             (lookupEnv)
 import System.Exit                    (die)
@@ -98,7 +99,9 @@ storeTerm conn newNamesStrList term = do
   let termHashText = hashTerm term
       newNamesTextList = map T.pack newNamesStrList
       metadataText = T.pack "{}"
-  -- Store all Merkle nodes for this term
+  -- Store all Merkle nodes for this term. This traversal is where lazy T
+  -- values are forced into normalized Merkle nodes for persistence.
+  hPutStrLn stderr $ "[tricu] storing " ++ show newNamesStrList
   _ <- storeMerkleNodes conn term
   existingNamesQuery <- query conn
     "SELECT names FROM terms WHERE hash = ?"