diff --git a/TestCentre/LibraryTests.fs b/TestCentre/LibraryTests.fs
index 22bce43..3cac331 100644
--- a/TestCentre/LibraryTests.fs
+++ b/TestCentre/LibraryTests.fs
@@ -61,4 +61,18 @@
         [<Property>]
         let ``Can populate the LoadingTestArea`` () =
             populateLoadingTestArea ()
-            true = true
\ No newline at end of file
+            true = true
+
+    module UnitTests =
+
+        open System.IO
+        open TestingHelpers
+        open Xunit
+
+        // This test is just a check to make sure the property tests have what they need to run.
+        [<Fact>]
+        let ``LoadingTestArea contains at least 100 test images`` () =
+            let files = Directory.GetFileSystemEntries (loadLocation, "*.png")
+            let length = files.Length
+            let result = if length < 100 then false else true
+            Assert.True result
\ No newline at end of file