summaryrefslogtreecommitdiff
path: root/files/practicum/Woordfrequentie.icl
diff options
context:
space:
mode:
authorCamil Staps2016-02-02 19:24:50 +0100
committerCamil Staps2016-02-02 19:24:50 +0100
commita7d7542dc646a5fd124ef71e71ce260889f1701b (patch)
tree04ed89503bbb3cc9933273a1326a53ca724c3492 /files/practicum/Woordfrequentie.icl
parentweek6 camil: working positioning of lines by putting empties at left and righ... (diff)
Moved to 1415 directoryHEADmaster
Diffstat (limited to 'files/practicum/Woordfrequentie.icl')
-rw-r--r--files/practicum/Woordfrequentie.icl28
1 files changed, 0 insertions, 28 deletions
diff --git a/files/practicum/Woordfrequentie.icl b/files/practicum/Woordfrequentie.icl
deleted file mode 100644
index 0dc03ad..0000000
--- a/files/practicum/Woordfrequentie.icl
+++ /dev/null
@@ -1,28 +0,0 @@
-implementation module Woordfrequentie
-
-import StdEnv, Frequentielijst, Words, FrequentielijstGUI
-
-// Zonder GUI:
-Start = lijst
-// Met GUI:
-Start world = toonFrequentielijst2 lijst world
-
-woordfrequentie :: String -> [(String,Int)]
-woordfrequentie ...
-
-lijst = woordfrequentie tekst
-tekst = foldl (+++) "" regels
-where
- regels = ["Far out in the uncharted backwaters of the unfashionable end of the western spiral\n"
- ,"arm of the Galaxy lies a small unregarded yellow sun.\n"
- ,"\n"
- ,"Orbiting this at a distance of roughly ninety-two million miles is an utterly\n"
- ,"insignificant little blue-green planet whose ape-descended life forms are so \n"
- ,"amazingly primitive that they still think digital watches are a pretty neat idea.\n"
- ,"\n"
- ,"This planet has - or rather had - a problem, which was this: most of the people\n"
- ,"living on it were unhappy for pretty much of the time.\n"
- ,"Many solutions were suggested for this problem, but most of these where largely\n"
- ,"concerned with the movements of small green pieces of paper, which is odd because\n"
- ,"on the whole it wasn’t the small green pieces of paper that were unhappy.\n"
- ]