<h2 id="heading-url">URL</h2>
<a target="_blank" href="https://leetcode.com/problems/middle-of-the-linked-list/description/?envType=daily-question&amp;envId=2024-03-07">https://leetcode.com/problems/middle-of-the-linked-list/description/?envType=daily-question&amp;envId=2024-03-07</a>
<h2 id="heading-code">Code</h2>
<a target="_blank" href="https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202403/middle_of_the_linked_list/main.fsx">https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202403/middle_of_the_linked_list/main.fsx</a>
<pre><code class="lang-fsharp">type ListNode =
 | Leaf
 | Node of int * ListNode

let middleNode (head: ListNode) : ListNode =
 let rec middleNode' node i =
 match node with
 | Leaf -&gt; i, Leaf
 | Node(_, next) -&gt;
 let len, p = middleNode' next (i + 1)

 match p with
 | Leaf -&gt; if i = len / 2 then len, node else len, Leaf
 | _ -&gt; len, p

 middleNode' head 0 |&gt; snd
</code></pre>

## URL

[https://leetcode.com/problems/middle-of-the-linked-list/description/?envType=daily-question&envId=2024-03-07](https://leetcode.com/problems/middle-of-the-linked-list/description/?envType=daily-question&envId=2024-03-07)

## Code

[https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202403/middle\_of\_the\_linked\_list/main.fsx](https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202403/middle_of_the_linked_list/main.fsx)

```fsharp
type ListNode =
    | Leaf
    | Node of int * ListNode

let middleNode (head: ListNode) : ListNode =
    let rec middleNode' node i =
        match node with
        | Leaf -> i, Leaf
        | Node(_, next) ->
            let len, p = middleNode' next (i + 1)

            match p with
            | Leaf -> if i = len / 2 then len, node else len, Leaf
            | _ -> len, p

    middleNode' head 0 |> snd
```

LeetCode 876. Middle of the Linked List in F#

URL

Code