Merge branch 'RFC-FS-1004-Result-methods' of github.com:wallymathieu/visualfsharp into RFC-FS-1004-Result-methods

Author: wallymathieu

src/fsharp/FSharp.Core.Unittests/FSharp.Core/Microsoft.FSharp.Core/ResultTests.fs

@@ -38,6 +38,8 @@ type ResultTests() =
 
     let shouldBeErrorWithValue expected maybeError = match maybeError with | Error e-> Assert.AreEqual(expected, e) | Ok v-> failwith "Expected Error, got Ok!"
 
+    let addOneOk (v:int) = Ok (v+1)
+
     [<Test>]
     member this.CanChainTogetherSuccessiveValidations() =
         test_validate_email "" (Error Empty)
@@ -68,7 +70,6 @@ type ResultTests() =
         |> mapError toUpper
         |> shouldBeOkWithValue "some@email.com"
 
-    let addOneOk (v:int) = Ok (v+1)
     [<Test>]
     member this.BindShouldModifyOkValue() =
         Ok 42