5 lines
89 B
Text
5 lines
89 B
Text
|
(let Freq NIL
|
||
|
|
(in "file.txt"
|
||
|
|
(while (char) (accu 'Freq @ 1)) )
|
||
|
|
(sort Freq) )
|