blob: 769b3457a4ec1a912e801dd84683f74f5eeb11fe (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
implementation module GesorteerdBestandNaarBoom
import StdEnv
import SimpleFileIO
Start :: *World -> (BTree String,*World)
Start world = readSortedFile pad world
cleanpad :== // padnaam naar je Clean-distributie (directory waarin CleanIDE.exe staat)
pad :== cleanpad +++ "Examples\\ObjectIO Examples\\scrabble\\Nederlands\\Nederlands_lexicon"
:: BTree a = // type definitie van binaire zoekboom
readSortedFile :: String *env -> (BTree String,*env) | FileSystem env
readSortedFile ...
writeSortedFile :: String (BTree String) *env -> *env | FileSystem env
writeSortedFile ...
|
