added char.hs