我想在 Haskell 中漂亮地打印一个类似表格的数据结构（列列表）。
例如...
Table [
StrCol "strings" ["a", "bc", "c"],
IntCol "ints" [1, 30, -2],
DblCol "doubles" [2.0, 4.5, -3.2]]
应该呈现类似...
strings ints doubles
"a" 1 2.0
"bc" 30 4.5
"c" -2 -3.2
目前我已经在最新版本的 Haskell 平台附带的 Text.PrettyPrint 中实现了这个功能。不幸的是， <+> 运算符将多行文档彼此“对角线”定向。
例如
(text "a" $+$ text "b") <+> (text "c" $+$ text "d")
呈现为
a
b c
d
而不是
a c
b d
结果，我转置单元格并首先水平合并它们，然后垂直合并，但这会导致列未对齐。
在一个较旧的表格打印问题中，augustss 指的是添加更多代码以使列自动适应最宽的条目。
我猜测每列的最大长度的“sizedText”会这样做，除了这个函数似乎不是 Haskell Platform Text.PrettyPrint 模块的一部分（我认为它在密切相关的 Text.Pretty 包中）。
实现这个漂亮打印功能的最简单的非hacky方法是什么？这是我项目的一小部分，所以我想避免编写自己的漂亮打印，如果可以的话，我更愿意避免模块依赖。