Add test harness and run the first program (#5)

WoofWare.PawPrint.Test/Assembly.fs

@@ -0,0 +1,21 @@
+namespace WoofWare.PawPrint.Test
+
+open System
+open System.IO
+open System.Reflection
+
+[<RequireQualifiedAccess>]
+module Assembly =
+
+    let getEmbeddedResource (name : string) (assy : Assembly) : Stream =
+        let resourceName =
+            assy.GetManifestResourceNames ()
+            |> Seq.filter (fun a -> a.EndsWith (name, StringComparison.Ordinal))
+            |> Seq.exactlyOne
+
+        assy.GetManifestResourceStream resourceName
+
+    let getEmbeddedResourceAsString (name : string) (assy : Assembly) : string =
+        use stream = getEmbeddedResource name assy
+        use reader = new StreamReader (stream, leaveOpen = true)
+        reader.ReadToEnd ()