I’m happy to answer your question, but I think we may be facing an X/Y problem. What are you trying to accomplish? There may be a specific piece of knowledge someone has that may solve the problem you’re actually having. 
That said, here’s how you’d chunk a list into groups of seven, with a list of whatever remains at the end.
sevens : List a -> List (List a)
sevens mapper items =
case items of
a :: b :: c :: d :: e :: f :: g :: rest ->
[ a, b, c, d, e, f, g ] : sevens rest
_ ->
items