LeetCode 459. Repeated Substring Pattern in F#

URL

Repeated Substring Pattern - LeetCode

Code

https://github.com/syohex/dotnet-study/tree/master/fsharp/leetcode/problems/0459/main.fsx

let repeatedSubstringPattern (s: string) : bool =
    let len = s.Length

    seq { 1 .. (len / 2) }
    |> Seq.filter (fun n -> len % n = 0)
    |> Seq.exists (fun n -> (s.Substring(0, n) |> String.replicate (len / n)) = s)