Updated script file to match code structure.

WetPancake/Script.fsx

@@ -17,6 +17,7 @@ open DataProcessing
 open DataStructuring
 open DataServices
 open WetPancake
+open System.Data
 
 // System Services
 let ss_number = PickRandomNumber 10
@@ -92,6 +93,9 @@ let ds_text2 = [
     [|"this"; "is"; "the"; "second"; "test"; "string"|]
     [|"this"; "is"; "the"; "third"; "test"; "string"|]
     ]
+let ds_text3 =
+    "This is\r a test \"string\" for\n\nIn ds_text 3\n"
+    |> ApplyStandardSetup
 let ds_map4 = ConstructMap ds_map ds_text2.[1]
 let ds_map5 = [for i in ds_text2 -> ConstructMap ds_map i]
 let ds_map6 =
@@ -108,12 +112,7 @@ let ds_map7Item = ds_map7.Item(0)
 // Data Services
 let dss_text =
     LoadFile (SelectRandomSampleFile())
-    |> ReplaceArtifact "\""
-    |> ReplaceArtifact "\n\nIn"
-    |> ReplaceArtifact "\r"
-    |> ReplaceArtifact "\n"
-    |> SplitText @"\s+"
-    |> ConcatToString
+    |> ApplyStandardSetup
     |> SortIntoGroups 2
     |> GenerateMap
 let dss_startwords = SeperateStartWords dss_text