read `KW.txt`:
L[8]:=[seq(BetterCount(8,i),i=1..1500)];