Browse Source

End of dinner break check-in.

master
Craig Oates 6 years ago
parent
commit
8fca151e9c
  1. 1
      WetPancake/DataStructuring.fs
  2. 6
      WetPancake/Script.fsx

1
WetPancake/DataStructuring.fs

@ -13,7 +13,6 @@
let ConstructMap map text =
BisectWords text ||> UpdateMap map
// This might be better in data processing...
let SeperateStartWords map =
let startWords, otherWords =
map

6
WetPancake/Script.fsx

@ -84,5 +84,11 @@ let ds_map2 =
let result = UpdateMap ds_map (fst(text)) (snd(text))
result
let ds_map3 = ConstructMap ds_map ds_text
let ds_text2 = [
[|"This"; "is"; "the"; "first"; "test"; "string."|]
[|"This"; "is"; "the"; "second"; "test"; "string";|]
[|"This"; "is"; "the"; "third"; "test"; "string";|]
]
let ds_map4 = ConstructMap // <-- finish building the map
let ds_start = SeperateStartWords ds_map3
// YOU ARE UP TO HERE. YOU NEED TO BUILD A BIGGER MAP TO TEST THE START WORD CODE.
Loading…
Cancel
Save