websocket/webgl demo in CommonLisp