From 379b6353396ca2401241d714733d570629835ffe Mon Sep 17 00:00:00 2001 From: Mart Lubbers Date: Fri, 6 Feb 2015 08:39:37 +0100 Subject: added practicum files, updated gitignore --- files/practicum/Frequentielijst.icl | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 files/practicum/Frequentielijst.icl (limited to 'files/practicum/Frequentielijst.icl') diff --git a/files/practicum/Frequentielijst.icl b/files/practicum/Frequentielijst.icl new file mode 100644 index 0000000..a0f6c58 --- /dev/null +++ b/files/practicum/Frequentielijst.icl @@ -0,0 +1,15 @@ +implementation module Frequentielijst + +import StdEnv, FrequentielijstGUI + +// Zonder GUI: +Start = lijst +// Met GUI: +Start world = toonFrequentielijst lijst world + +lijst = sort (frequentielijst tekst) +tekst = ['Hello world! Here I am!'] + + +frequentielijst :: [a] -> [(a,Int)] | == a +frequentielijst ... -- cgit v1.2.3