From c118327406cff4a647c92217de082aaf0cfa3f85 Mon Sep 17 00:00:00 2001
From: Jamil Maqdis Anton <jamil.maqdis-anton@insurello.se>
Date: Thu, 17 Dec 2020 17:38:17 +0100
Subject: [PATCH] Add short name for builder

---
 src/Option.fs | 2 ++
 src/Result.fs | 2 ++
 2 files changed, 4 insertions(+)

diff --git a/src/Option.fs b/src/Option.fs
index 9d8c60a..e7c3e22 100644
--- a/src/Option.fs
+++ b/src/Option.fs
@@ -97,3 +97,5 @@ module OptionCE =
         member _.BindReturn(option: 'a option, f: 'a -> 'b): 'b option = Option.map f option
 
         member _.MergeSources(option1: 'a option, option2: 'b option) = Option.zip option1 option2
+
+    let option = OptionBuilder()
diff --git a/src/Result.fs b/src/Result.fs
index 1739f82..d7e5b85 100644
--- a/src/Result.fs
+++ b/src/Result.fs
@@ -101,3 +101,5 @@ module ResultCE =
 
         member _.MergeSources(result1: Result<'a, 'e>, result2: Result<'b, 'e>): Result<'a * 'b, 'e> =
             Result.zip result1 result2
+
+    let result = ResultBuilder()