Clean up and list SKI conversion fix

src/REPL.hs

@@ -152,7 +152,7 @@ repl env = runInputT settings (withInterrupt (loop env Decode))
           newEnv = evalTricu env asts
       case Map.lookup "!result" newEnv of
         Just r -> do
-          putStrLn $ "tricu > " ++ formatResult form r
+          putStrLn $ "tricu > " ++ formatT form r
         Nothing -> pure ()
       return newEnv
 
@@ -182,7 +182,7 @@ repl env = runInputT settings (withInterrupt (loop env Decode))
           liftIO $ writeFile filepath ""
           outputStrLn "File created..."
           forM_ definitions $ \(name, value) -> do
-            let content = name ++ " = " ++ formatResult TreeCalculus value ++ "\n"
+            let content = name ++ " = " ++ formatT TreeCalculus value ++ "\n"
             outputStrLn $ "Writing definition: " ++ name ++ " with length " ++ show (length content)
             liftIO $ appendFile filepath content
           outputStrLn $ "Saved " ++ show (length definitions) ++ " definitions to " ++ p