Add distributed F# monitoring platform

tests/IpCheck.UnitTests/Program.fs

@@ -0,0 +1,15 @@
+open System
+open IpCheck.Domain
+
+let assertTrue message condition = if not condition then failwith message
+
+[<EntryPoint>]
+let main _ =
+    let valid = Target.create "192.168.1.10" None [ Ping; TcpPort("ssh", 22us) ] (TimeSpan.FromSeconds 60.0)
+    let invalidAddress = Target.create "not-an-ip" None [ Ping ] (TimeSpan.FromSeconds 60.0)
+    let invalidInterval = Target.create "127.0.0.1" None [ Ping ] (TimeSpan.FromSeconds 5.0)
+    assertTrue "Корректный адрес должен создавать цель" (Result.isOk valid)
+    assertTrue "Некорректный адрес должен отклоняться" (Result.isError invalidAddress)
+    assertTrue "Слишком короткий интервал должен отклоняться" (Result.isError invalidInterval)
+    printfn "Все доменные тесты пройдены"
+    0