<h2 id="heading-url">URL</h2>
<p><a target="_blank" href="https://leetcode.com/problems/last-stone-weight/description/">Last Stone Weight - LeetCode</a></p>
<h2 id="heading-code">Code</h2>
<p><a target="_blank" href="https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202304/last_stone_weight/main.fsx">https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202304/last_stone_weight/main.fsx</a></p>
<pre><code class="lang-plaintext">let lastStoneWeight (stones: int list) : int =
    let rec lastStoneWeight' stones =
        match stones with
        | [] -&gt; 0
        | h :: [] -&gt; h
        | h1 :: h2 :: t -&gt;
            if h1 = h2 then
                lastStoneWeight' t
            else
                let stones' = ((h1 - h2) :: t) |&gt; List.sort |&gt; List.rev
                lastStoneWeight' stones'

    lastStoneWeight' (stones |&gt; List.sort |&gt; List.rev)
</code></pre>


## URL

[Last Stone Weight - LeetCode](https://leetcode.com/problems/last-stone-weight/description/)

## Code

[https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202304/last\_stone\_weight/main.fsx](https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202304/last_stone_weight/main.fsx)

```plaintext
let lastStoneWeight (stones: int list) : int =
    let rec lastStoneWeight' stones =
        match stones with
        | [] -> 0
        | h :: [] -> h
        | h1 :: h2 :: t ->
            if h1 = h2 then
                lastStoneWeight' t
            else
                let stones' = ((h1 - h2) :: t) |> List.sort |> List.rev
                lastStoneWeight' stones'

    lastStoneWeight' (stones |> List.sort |> List.rev)
```

LeetCode 1046. Last Stone Weight in F#

URL

Code