Adds lens.hs sketch