Haskell Pure Function Debug 小技巧