don't print substitutions by default

This commit is contained in:
rhiannon morris 2023-02-26 11:25:11 +01:00
parent 8447098f28
commit 75ef078b4b
2 changed files with 42 additions and 21 deletions

View file

@ -63,5 +63,6 @@ tm =
main : IO Unit
main = do
putStrLn $ banner defPrettyOpts
prettyTermDef @{TermSubst True} tm
prettyTermDef @{TermSubst True} $ fst $ pushSubsts tm
prettyTermDef tm
prettyTermDef $ pushSubsts tm