<h2 id="heading-url">URL</h2>
<a target="_blank" href="https://leetcode.com/problems/backspace-string-compare/description/?envType=daily-question&amp;envId=2023-10-19">Backspace String Compare - LeetCode</a>
<h2 id="heading-code">Code</h2>
<a target="_blank" href="https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202310/backspace_string_compare/main.fsx">https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202310/backspace_string_compare/main.fsx</a>
<pre><code class="lang-fsharp">let backspaceCompare (s: string) (t: string) : bool =
 let rec f cs skips acc =
 match cs with
 | [] -&gt; acc
 | h :: t -&gt;
 if h = '#' then f t (skips + 1) acc
 else if skips &gt; 0 then f t (skips - 1) acc
 else f t skips (h :: acc)

 let fn = Seq.toList &gt;&gt; List.rev
 let s' = f (fn s) 0 []
 let t' = f (fn t) 0 []

 s' = t'
</code></pre>

## URL

[Backspace String Compare - LeetCode](https://leetcode.com/problems/backspace-string-compare/description/?envType=daily-question&envId=2023-10-19)

## Code

[https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202310/backspace\_string\_compare/main.fsx](https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202310/backspace_string_compare/main.fsx)

```fsharp
let backspaceCompare (s: string) (t: string) : bool =
    let rec f cs skips acc =
        match cs with
        | [] -> acc
        | h :: t ->
            if h = '#' then f t (skips + 1) acc
            else if skips > 0 then f t (skips - 1) acc
            else f t skips (h :: acc)

    let fn = Seq.toList >> List.rev
    let s' = f (fn s) 0 []
    let t' = f (fn t) 0 []

    s' = t'
```

LeetCode 844. Backspace String Compare in F#

URL

Code