type Cont a b = (b -> a) -> a
Cont
This type synonym should probably be removed, since it is more confusing than helpful.