Create fast_reverse.hs