[Haskell-cafe] using phantom types to validate html