modified:   examples/renderToGloss.hs