Writing a simple evaluator and type-checker in Haskell
bor0.wordpress.com
bor0.wordpress.com
The book is really great. It starts with a very interesting explanation of lambda calculus and how high-level functional programming language can be tied to it. Chapters 8 and 9 were written by Peter Hancock and cover step by step how to write a polymorphic type-checker (the examples are in Miranda but it's not far from Haskell).
For a 1987 book, it all aged very well.
Hilarity.
Recommended:
Christoph Hegemann: type inference from scratch: https://www.youtube.com/watch?v=ytPAlhnAKro
<bool> ::= T | F | IsZero <num>
<num> ::= O
<arith> ::= Succ <num> | Pred <num>
Here `<num>` can only ever be `O`, so that's the only valid argument for `IsZero`, `Succ` and `Pred`. I would put `O` into `<arith>`, get rid of `<num>` and replace all references to it with `<arith>`.That doesn't affect the actual implementation, since (as they say right after) "For simplicity, we merge all them together in a single Term."