L1->L5
SortA(L5)
1 -> dim(L6)
0 -> C
0 -> H
1 -> N
dim(L5) + 1 -> dim(L5)
-157499658 -> L5(dim(L5))

For (I,1,dim(L5) - 1)
	If L5(I) = L5(I + 1): Then 
		C + 1 -> C
	Else
		If C > H :then
			C -> H
			1 -> dim(L6)
			L5(I) -> L6(1)
			1 -> N
		End
		If C = H and C != 0 :Then
			If L5(I) != L6(N) or L6(N) = 0 :Then
				N + 1 -> N
				N -> dim(L6)
				L5(I) -> L6(N)	
			End
		End
		0 -> C
	End	
End
0 -> dim(L5)
L6 * 1