<h2 id="heading-url">URL</h2>
<a target="_blank" href="https://leetcode.com/problems/check-if-one-string-swap-can-make-strings-equal/description/?envType=daily-question&amp;envId=2025-02-05">Check if One String Swap Can Make Strings Equal - LeetCode</a>
<h2 id="heading-code">Code</h2>
<a target="_blank" href="https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202502/check_if_one_string_swap_can_make_strings_equal/main.fsx">https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202502/check_if_one_string_swap_can_make_strings_equal/main.fsx</a>
<pre><code class="lang-fsharp">let areAlmostEqual (s1: string) (s2: string) : bool =
 let v = Seq.zip s1 s2 |&gt; Seq.filter (fun (c1, c2) -&gt; c1 &lt;&gt; c2) |&gt; Seq.toList

 match v with
 | [] -&gt; true
 | _ :: [] -&gt; false
 | (a1, a2) :: (b1, b2) :: [] when a1 = b2 &amp;&amp; a2 = b1 -&gt; true
 | _ -&gt; false
</code></pre>

## URL

[Check if One String Swap Can Make Strings Equal - LeetCode](https://leetcode.com/problems/check-if-one-string-swap-can-make-strings-equal/description/?envType=daily-question&envId=2025-02-05)

## Code

[https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202502/check\_if\_one\_string\_swap\_can\_make\_strings\_equal/main.fsx](https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/challenge/202502/check_if_one_string_swap_can_make_strings_equal/main.fsx)

```fsharp
let areAlmostEqual (s1: string) (s2: string) : bool =
 let v = Seq.zip s1 s2 |> Seq.filter (fun (c1, c2) -> c1 <> c2) |> Seq.toList

 match v with
 | [] -> true
 | _ :: [] -> false
 | (a1, a2) :: (b1, b2) :: [] when a1 = b2 && a2 = b1 -> true
 | _ -> false
```

LeetCode 1790. Check if One String Swap Can Make Strings Equal in F#

URL

Code