More
Tables
words := table(0)while line := read() do line ? while tab(upto(&letters)) do words[tab(many(&letters))] +:= 1
Previous slide
Next slide
Back to first slide
View graphic version