Working on translate.hs.