just the wrong foldr
fast F