Update monadhaha.hs