colorlist.hs