LeetCode 392. Is Subsequence in F#

URL

leetcode.com/problems/is-subsequence

Code

github.com/syohex/dotnet-study/blob/master/..

let isSubsequence (s: string) (t: string) : bool =
    let rec isSubsequence' cs ct =
        match cs with
        | [] -> true
        | x :: xs ->
            match List.tryFindIndex ((=) x) ct with
            | Some (p) -> isSubsequence' xs (ct |> List.skip (p + 1))
            | None -> false

    isSubsequence' (s |> Seq.toList) (t |> Seq.toList)