LeetCode 704. Binary Search in F#

URL

https://leetcode.com/problems/binary-search/description/

Code

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

let search (nums: int []) (target: int) : int =
    let rec search' (nums: int []) left right target =
        if left > right then
            -1
        else
            let mid = left + (right - left) / 2

            if nums.[mid] = target then
                mid
            elif nums.[mid] < target then
                search' nums (mid + 1) right target
            else
                search' nums left (mid - 1) target

    search' nums 0 (nums.Length - 1) target