Update MutualInfo.hs