Not sure how useful this is, but I often wondered what everyone else is doing with HOpenGL, and one can never have enough examples. This one is translated from someone else's OCaml program (see comments for original c.l.f thread). Tranlation was mostly straightforward. One hitch was the use of End/Begin style for LineStrip in the OCaml version - we have renderPrimitive instead, which keeps us from making errors in Begin/End bracketing. But what about programs that rely on fiddling with the bracketing (not that that is recommended)? Here I got round the issue by using edgeFlag, but what about a general solution? I saw primitiveRestart in GL.BeginEnd, but there's no explanation of what it does, and it isn't supported on my platform anyway. Enjoy, Claus