Update fast_reverse.hs