-module(fix).
-export([partition/2]).

partition(List, Size) ->
    lists:reverse(partition(List, Size, 1, [])).

partition(List, _Size, Idx, Acc) when Idx > length(List) -> Acc;
partition(List, Size, Idx, Acc) ->
    partition(List, Size, Idx + Size, [lists:sublist(List, Idx, Size)|Acc]).