By: Christophe Poucet

Hey,

Interesting article. I still have to take the time to do more than just skim the code. But just FYI, here is a (small?) performance optimization.

Make your node data strict:

data NodeInfo = NodeInfo !GLfloat !GLfloat deriving (Show, Eq)