LeetCode 1287. Element Appearing More Than 25% In Sorted Array in F#

URL

https://leetcode.com/problems/element-appearing-more-than-25-in-sorted-array/description/?envType=daily-question&envId=2023-12-11

Code

https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202312/element_appearing_more_than_25percent_in_sorted_array/main.fsx

let findSpecialInteger (arr: int list) : int =
    arr
    |> List.windowed ((List.length arr / 4) + 1)
    |> List.find (fun a -> List.head a = List.last a)
    |> List.head