Reformat all source files with the new rules

Author: abelbraaksma

src/FSharp.Control.TaskSeq.Test/Nunit.Extensions.fs

@@ -22,11 +22,7 @@ module ExtraCustomMatchers =
     let private baseResultTypeTest value =
         match value with
         | null ->
-            EqualException.ForMismatchedValues(
-                "Result type",
-                "<null>",
-                "Value <null> or None is never Result.Ok or Result.Error"
-            )
+            EqualException.ForMismatchedValues("Result type", "<null>", "Value <null> or None is never Result.Ok or Result.Error")
             |> raise
 
         | _ ->
@@ -53,11 +49,7 @@ module ExtraCustomMatchers =
                 | "None" -> None
                 | _ ->
                     raise
-                    <| EqualException.ForMismatchedValues(
-                        "Option type",
-                        ty.Name,
-                        "Unexpected field name for F# option type"
-                    )
+                    <| EqualException.ForMismatchedValues("Option type", ty.Name, "Unexpected field name for F# option type")
             else
                 EqualException.ForMismatchedValues("Option type", ty.Name, "Type must be Option<_>")
                 |> raise

src/FSharp.Control.TaskSeq.Test/TestUtils.fs

@@ -87,9 +87,7 @@ type DummyTaskFactory(µsecMin: int64<µs>, µsecMax: int64<µs>) =
     let rnd = Random()
     let rnd () = rnd.NextInt64(int64 µsecMin, int64 µsecMax) * 1L<µs>
 
-    let runTaskDelayed () = backgroundTask {
-        return! DelayHelper.delayTask µsecMin µsecMax (fun _ -> Interlocked.Increment &x)
-    }
+    let runTaskDelayed () = backgroundTask { return! DelayHelper.delayTask µsecMin µsecMax (fun _ -> Interlocked.Increment &x) }
 
     let runTaskDelayedImmutable i = backgroundTask { return! DelayHelper.delayTask µsecMin µsecMax (fun _ -> i + 1) }
 
@@ -513,9 +511,7 @@ module TestUtils =
                         yield! taskSeq {
                             yield! taskSeq {
                                 yield! taskSeq {
-                                    yield! taskSeq {
-                                        yield! taskSeq { yield! taskSeq { yield! taskSeq { yield! nestedTaskSeq } } }
-                                    }
+                                    yield! taskSeq { yield! taskSeq { yield! taskSeq { yield! taskSeq { yield! nestedTaskSeq } } } }
                                 }
                             }
                         }

src/FSharp.Control.TaskSeq/TaskExtensions.fs

@@ -19,11 +19,7 @@ module TaskExtensions =
 
         /// Used by `For`. F# currently doesn't support `while!`, so this cannot be called directly from the task CE
         /// This code is mostly a copy of TaskSeq.WhileAsync.
-        member inline _.WhileAsync
-            (
-                [<InlineIfLambda>] condition: unit -> ValueTask<bool>,
-                body: TaskCode<_, unit>
-            ) : TaskCode<_, _> =
+        member inline _.WhileAsync([<InlineIfLambda>] condition: unit -> ValueTask<bool>, body: TaskCode<_, unit>) : TaskCode<_, _> =
             let mutable condition_res = true
 
             // note that this While itself has both a dynamic and static implementation

src/FSharp.Control.TaskSeq/TaskSeq.fs

@@ -265,10 +265,7 @@ module TaskSeq =
 
     let exactlyOne source =
         Internal.tryExactlyOne source
-        |> Task.map (
-            Option.defaultWith (fun () ->
-                invalidArg (nameof source) "The input sequence contains more than one element.")
-        )
+        |> Task.map (Option.defaultWith (fun () -> invalidArg (nameof source) "The input sequence contains more than one element."))
 
     let indexed (source: taskSeq<'T>) =
         Internal.checkNonNull (nameof source) source

src/FSharp.Control.TaskSeq/TaskSeqBuilder.fs

@@ -390,11 +390,7 @@ type TaskSeqBuilder() =
         ResumableCode.Combine(task1, task2)
 
     /// Used by `For`. F# currently doesn't support `while!`, so this cannot be called directly from the CE
-    member inline _.WhileAsync
-        (
-            [<InlineIfLambda>] condition: unit -> ValueTask<bool>,
-            body: ResumableTSC<'T>
-        ) : ResumableTSC<'T> =
+    member inline _.WhileAsync([<InlineIfLambda>] condition: unit -> ValueTask<bool>, body: ResumableTSC<'T>) : ResumableTSC<'T> =
         let mutable condition_res = true
 
         ResumableCode.While(