a toy haskell/javascript webgl harness