Began cleaning up the duplicate code.

WetPancake/ProductServices.fs

@@ -22,22 +22,7 @@ module  Pancake =
         |> SplitText @"\s+"
         |> ConcatToString
 
-    // MOVE THIS INTO AN OBJECT (OF SORTS)
     let RequestRandomText() =
-        let data =
-            LoadFile SelectRandomSampleFile
-            |> ReplaceArtifact "\""
-            |> ReplaceArtifact "\n\nIn"
-            |> ReplaceArtifact "\r"
-            |> ReplaceArtifact "\n"
-            |> SplitText @"\s+"
-            |> ConcatToString
-            |> SortIntoGroups (PickRandomNumber 10)
-            |> GenerateMap
-        GenerateMarkovText (PickRandomNumber 10) data
-
-    // MOVE THIS INTO AN OBJECT (OF SORTS)
-    let RequestRandomText2() =
        let data2 =
            LoadFile SelectRandomSampleFile
            |> ApplyStandardSetup

WetPancakeCLI/ConsoleCommands.cs

@@ -32,9 +32,7 @@ namespace WetPancakeCLI
         [Usage("> GenerateRandomText")]
         public static string GenerateRandomText()
         {
-            // need to make new objects.
-            // the static class just hold onto the initial data generated.
-            var result = RequestRandomText2();
+            var result = RequestRandomText();
             return result;
         }