Commit Logic.hs