feat: parenthesize in the pretty printer

DocGen4/Process.lean

@@ -72,8 +72,9 @@ structure Module where
   members : Array DocInfo
   deriving Inhabited
 
-def prettyPrintTerm (expr : Expr) : MetaM Syntax :=
+def prettyPrintTerm (expr : Expr) : MetaM Syntax := do
-  delab Name.anonymous [] expr
+  let term ← delab Name.anonymous [] expr
+  parenthesizeTerm term
 
 def Info.ofConstantVal (v : ConstantVal) : MetaM Info := do
   let env ← getEnv