introduce currentUnit lens. remove all getTheUnit and putTheUnit