Seq.choose id

kirillgarbar · kirillgarbar · commit 7a400a7bfc24 · 2022-12-05T00:47:37.000+03:00
diff --git a/tests/GraphBLAS-sharp.Tests/QuickGraph/CreateGraph.fs b/tests/GraphBLAS-sharp.Tests/QuickGraph/CreateGraph.fs
@@ -27,10 +27,6 @@ module CreateGraph =
         let edgeList =
             edgeMatrix
             |> Seq.cast<Edge<'a> option>
-            |> Seq.choose
-                (fun x ->
-                    match x with
-                    | Some _ -> x
-                    | _ -> None)
+            |> Seq.choose id
 
         edgeList.ToUndirectedGraph()
