add 023.hs