add Beer.hs