replaced foldl (++) with concat