This commit is contained in:
Ingy döt Net 2013-04-10 21:29:02 -07:00
parent 764da6cbbb
commit db842d013d
19005 changed files with 197040 additions and 7 deletions

View file

@ -0,0 +1,9 @@
open datetime random console
loop = loop' 1
where loop' n t | r == t = writen (show r)
| else = writen (show r) `seq` loop' (n+1) t
where seed = toInt <| (ticks <| datetime.now()) * n
r = rnd seed 0 19
loop 10