<h2 id="heading-url">URL</h2>
<p><a target="_blank" href="https://leetcode.com/problems/string-matching-in-an-array/description/?envType=daily-question&amp;envId=2025-01-07">https://leetcode.com/problems/string-matching-in-an-array/description/?envType=daily-question&amp;envId=2025-01-07</a></p>
<h2 id="heading-code">Code</h2>
<p><a target="_blank" href="https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202501/string_matching_in_an_array/main.fsx">https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202501/string_matching_in_an_array/main.fsx</a></p>
<pre><code class="lang-fsharp"><span class="hljs-keyword">let</span> stringMatching (words: string list) : string list =
    <span class="hljs-keyword">let</span> words = List.indexed words

    words
    |&gt; List.fold
        (<span class="hljs-keyword">fun</span> acc (i, word) -&gt;
            <span class="hljs-keyword">match</span> List.tryFind (<span class="hljs-keyword">fun</span> (j, (w: string)) -&gt; i &lt;&gt; j &amp;&amp; w.Contains(word)) words <span class="hljs-keyword">with</span>
            | Some(_) -&gt; word :: acc
            | None -&gt; acc)
        []
</code></pre>


## URL

[https://leetcode.com/problems/string-matching-in-an-array/description/?envType=daily-question&envId=2025-01-07](https://leetcode.com/problems/string-matching-in-an-array/description/?envType=daily-question&envId=2025-01-07)

## Code

[https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202501/string\_matching\_in\_an\_array/main.fsx](https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202501/string_matching_in_an_array/main.fsx)

```fsharp
let stringMatching (words: string list) : string list =
    let words = List.indexed words

    words
    |> List.fold
        (fun acc (i, word) ->
            match List.tryFind (fun (j, (w: string)) -> i <> j && w.Contains(word)) words with
            | Some(_) -> word :: acc
            | None -> acc)
        []
```

LeetCode 1408. String Matching in an Array in F#

URL

Code