Update investment.hs