Update Sequence Expressions snippet to use implicit yields

_snippets/computation_expressions.md

@@ -5,13 +5,12 @@
 code: |
     // Define a custom computation expression for validation
     type ValidationBuilder() =
-        member _.Bind(x, f) = 
+        member _.Bind(x, f) = // Defines "let!"
             match x with
             | Ok value -> f value
             | Error e -> Error e
-        member _.Return(x) = Ok x
-        member _.ReturnFrom(x) = x
-
+        member _.Return(x) = Ok x // Defines "return"
+        member _.ReturnFrom(x) = x // Defines "return!"
     let validate = ValidationBuilder()
 
     type Person = { Name: string; Age: int }
@@ -22,19 +21,22 @@
             if age >= 0 && age < 150 then Ok age
             else Error "Age must be between 0 and 150"
 
-        let! validName = 
+        let! nonEmptyName = 
             if String.length name > 0 then Ok name
             else Error "Name cannot be empty"
 
-        return { Name = validName; Age = validAge }
+        if String.length name > 100 then
+            return! Error "Name is too long!"
+        else
+            return { Name = nonEmptyName; Age = validAge }
     }
 ---
 ## Clean Code with Computation Expressions
 
 F# computation expressions give you an elegant syntax for compositional control flows with a clean, readable notation that some say is F#'s superpower.
 <!--more-->
 - **Computation expressions** factor out how code is composed together
 - **Custom control flow abstractions** create domain-specific mini-languages
 - **Seamless error handling** with [railway-oriented programming](https://fsharpforfunandprofit.com/rop/) patterns
 - **Elegant data transformations** by hiding boilerplate and focusing on business logic
 - **Composable workflows** that can be combined and nested for complex operations

_snippets/sequence_expressions.md

@@ -3,15 +3,14 @@
 title: SequenceExpressions.fs
 excerpt_separator: <!--more-->
 code: |
-    // A function generating a sequence of numbers
     let rec fizzBuzzSeq n = seq {
-        yield
-            match n with
-            | x when x % 15 = 0 -> "fizzbuzz"
-            | x when x % 3 = 0 -> "fizz"
-            | x when x % 5 = 0 -> "buzz"
-            | _ -> n.ToString()
-
+        match n with
+        | x when x % 15 = 0 -> "fizzbuzz"
+        | x when x % 3 = 0 -> "fizz"
+        | x when x % 5 = 0 -> "buzz"
+        | _ -> n.ToString()
+
+        // Tail recursion makes this as efficient as a "while" loop
         yield! fizzBuzzSeq (n + 1)
     }
 
@@ -22,7 +21,7 @@
 ---
 ## Data Pipelines with Sequence Expressions
 
 F# sequence expressions provide compositional, functional stream processing capabilities that integrate seamlessly with every part of the language.
 <!--more-->
 - **Simplified data generation** through sequence expressions
 - **Compositional data processing** through library routines