<h2 id="heading-url">URL</h2>
<p><a target="_blank" href="https://leetcode.com/problems/summary-ranges/description/">Summary Ranges - 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/202306/summary_ranges/main.fsx">https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202306/summary_ranges/main.fsx</a></p>
<pre><code class="lang-plaintext">let summaryRanges (nums: int list) : string list =
    let rec summaryRanges' nums start prev acc =
        match nums with
        | [] -&gt;
            if start = prev then
                (string start) :: acc |&gt; List.rev
            else
                (sprintf "%d-&gt;%d" start prev) :: acc |&gt; List.rev
        | h :: t -&gt;
            if (h - 1) = prev then
                summaryRanges' t start h acc
            else
                let acc' =
                    if start = prev then
                        (string start) :: acc
                    else
                        (sprintf "%d-&gt;%d" start prev) :: acc
                summaryRanges' t h h acc'

    match nums with
    | [] -&gt; []
    | h :: t -&gt; summaryRanges' t h h []
</code></pre>


## URL

[Summary Ranges - LeetCode](https://leetcode.com/problems/summary-ranges/description/)

## Code

[https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202306/summary\_ranges/main.fsx](https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202306/summary_ranges/main.fsx)

```plaintext
let summaryRanges (nums: int list) : string list =
    let rec summaryRanges' nums start prev acc =
        match nums with
        | [] ->
            if start = prev then
                (string start) :: acc |> List.rev
            else
                (sprintf "%d->%d" start prev) :: acc |> List.rev
        | h :: t ->
            if (h - 1) = prev then
                summaryRanges' t start h acc
            else
                let acc' =
                    if start = prev then
                        (string start) :: acc
                    else
                        (sprintf "%d->%d" start prev) :: acc
                summaryRanges' t h h acc'

    match nums with
    | [] -> []
    | h :: t -> summaryRanges' t h h []
```

LeetCode 228. Summary Ranges in F#

URL

Code