<h2 id="heading-url">URL</h2>
<p><a target="_blank" href="https://leetcode.com/problems/minimum-number-of-arrows-to-burst-balloons/description/">Minimum Number of Arrows to Burst Balloons - LeetCode</a></p>
<h2 id="heading-code">Code</h2>
<p><a target="_blank" href="https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/0452/main.fsx">https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/0452/main.fsx</a></p>
<pre><code class="lang-plaintext">let findMinArrowShots (points: (int * int) list) : int =
    let rec findMinArrowShots' points (end1: int) acc =
        match points with
        | [] -&gt; acc
        | (s, e) :: t -&gt;
            if s &lt;= end1 then
                findMinArrowShots' t (System.Math.Min(e, end1)) acc
            else
                findMinArrowShots' t e (acc + 1)

    let points = points |&gt; List.sortWith (fun (s1, _) (s2, _) -&gt; compare s1 s2)
    findMinArrowShots' (points.Tail) (snd points.Head) 1
</code></pre>


## URL

[Minimum Number of Arrows to Burst Balloons - LeetCode](https://leetcode.com/problems/minimum-number-of-arrows-to-burst-balloons/description/)

## Code

[https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/0452/main.fsx](https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/0452/main.fsx)

```plaintext
let findMinArrowShots (points: (int * int) list) : int =
    let rec findMinArrowShots' points (end1: int) acc =
        match points with
        | [] -> acc
        | (s, e) :: t ->
            if s <= end1 then
                findMinArrowShots' t (System.Math.Min(e, end1)) acc
            else
                findMinArrowShots' t e (acc + 1)

    let points = points |> List.sortWith (fun (s1, _) (s2, _) -> compare s1 s2)
    findMinArrowShots' (points.Tail) (snd points.Head) 1
```

452. Minimum Number of Arrows to Burst Balloons in F#

URL

Code