From 3db57eabcaa24b7ea052cb9bd6ccb8548eeace16 Mon Sep 17 00:00:00 2001
From: davidon-top <me@davidon.top>
Date: Wed, 15 Jan 2025 09:25:58 +0100
Subject: [PATCH] u20

---
 ulohyfs/src/u20.fs     | 13 +++++++++++++
 ulohyfs/ulohyfs.fsproj |  1 +
 2 files changed, 14 insertions(+)
 create mode 100644 ulohyfs/src/u20.fs

diff --git a/ulohyfs/src/u20.fs b/ulohyfs/src/u20.fs
new file mode 100644
index 0000000..52bb379
--- /dev/null
+++ b/ulohyfs/src/u20.fs
@@ -0,0 +1,13 @@
+module UlohyFs.u20
+
+open System.IO
+open UlohyFs.Attributes
+open System
+
+[<Uloha(20)>]
+let uloha15() =
+    let hostia = ["Novak"; "Novaková"; "novy"; "mlinar"; "mlinarová"; "kovac"; "kovacová"; "rybar"; "rybarová"; "farmar"; "gazdová"]
+    let hostiaZ = hostia |> List.filter _.EndsWith("ová") |> List.sort
+    let hostiaM = hostia |> List.filter (fun x -> not(x.EndsWith("ová"))) |> List.sort
+    printfn "Zeny: %A" hostiaZ
+    printfn "Muzi: %A" hostiaM
\ No newline at end of file
diff --git a/ulohyfs/ulohyfs.fsproj b/ulohyfs/ulohyfs.fsproj
index e84b335..96116b9 100644
--- a/ulohyfs/ulohyfs.fsproj
+++ b/ulohyfs/ulohyfs.fsproj
@@ -13,6 +13,7 @@
         <Compile Include="src\u17.fs" />
         <Compile Include="src\u18.fs" />
         <Compile Include="src\u19.fs" />
+        <Compile Include="src\u20.fs" />
         <Compile Include="src\Program.fs" />
     </ItemGroup>