+ ValueOption.toOption

gusty · gusty · commit 594327ab6689 · 2023-02-05T09:36:33.000+01:00
diff --git a/src/FSharpPlus/Extensions/ValueOption.fs b/src/FSharpPlus/Extensions/ValueOption.fs
@@ -70,3 +70,8 @@ module ValueOption =
         match pair with
         | true,  x -> ValueSome x
         | false, _ -> ValueNone
+
+    let toOption x =
+        match x with
+        | ValueSome x -> Some x
+        | ValueNone   -> None
