# Divide Equally

![](https://1430428134-files.gitbook.io/~/files/v0/b/gitbook-legacy-files/o/assets%2F-Ld8QK19sjP1I9rhLouo%2F-LhLKeaxG3gSolSHSZ5H%2F-LhLKme_1zK2x2j5gNwy%2F3bowls.png?alt=media\&token=a2930ffe-b254-4719-b518-fd2446191e0a)

{% file src="<https://1430428134-files.gitbook.io/~/files/v0/b/gitbook-legacy-files/o/assets%2F-Ld8QK19sjP1I9rhLouo%2F-LhLKeaxG3gSolSHSZ5H%2F-LhLKunIlvSgMWsRnlCy%2F3bowlsDS.zip?alt=media&token=5a4114f8-39cb-4521-ae90-cd51c956e9fc>" %}

```d
//Sorting into three lists
nSrt=List.Reverse(List.Sort(n));
nSbL=List.Chop(nSrt,3);
lst1=List.Transpose(List.TakeEveryNthItem(nSbL,2,-1));
lst2=List.Transpose(List.Reverse((List.TakeEveryNthItem(nSbL,2,0))<1>));

//Three sublists with the sum of numbers more or less the same
lst3=(List.Transpose([List.Shuffle(lst1<1>),List.Shuffle(lst2<1>)]));
lst4 = List.Flatten(List.Clean(lst3,false)<1>,-1);
```