From a7d7542dc646a5fd124ef71e71ce260889f1701b Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Tue, 2 Feb 2016 19:24:50 +0100
Subject: Moved to 1415 directory

---
 1415/fp2/week1/mart/Galgje.icl | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100644 1415/fp2/week1/mart/Galgje.icl

(limited to '1415/fp2/week1/mart/Galgje.icl')

diff --git a/1415/fp2/week1/mart/Galgje.icl b/1415/fp2/week1/mart/Galgje.icl
new file mode 100644
index 0000000..e5106ee
--- /dev/null
+++ b/1415/fp2/week1/mart/Galgje.icl
@@ -0,0 +1,13 @@
+module Galgje
+
+import StdEnv, Random
+
+//randomWord :: *env -> (Maybe String, *env) | FileSystem env                     
+//randomWord env                                                                  
+//# (ss,env) = readLines lexicon_file env                                         
+//| ss == Nothing = (Nothing, env)                                                
+//# (seed,env) = getNewRandomSeed env                                             
+//| otherwise = (Just (skip_nl ((shuffle (fromJust ss) seed)!!0)), env) 
+
+Start :: *World -> *World
+Start world = world
-- 
cgit v1.2.3