clean up 039.hs