Specialize foldr, foldl' in instance Foldable FT

The default implementations in terms of foldMap were rather slow.