Как найти минимальный список кортежей

Question

Мне нужно найти как минимум список кортежей, но я хочу только вернуть минимум snd элемент кортежей, а не весь кортеж. К сожалению, у меня есть следующая ошибка в следующем коде, и я не знаю, почему. Л аргументом является список кортежей (float * float)

let rec minRight l = match l with 
    | [] -> raise (Arg.Bad "minRight: empty list") 
    | [x]-> x 
    | (_,y)::xs -> min y (minRight xs) 

Ошибка:

| (_,y)::xs -> min y (minRight xs) 
Error: This expression has type 'a but an expression was expected of type 
     'b * 'a 

Спасибо заранее.

Answer 1

Вот одна проблема, в дополнение к тем, что упомянутые в предыдущих ответах: линия

| [x]-> x 

возвращает кортеж, в то время как вы сказали, что хотите «вернуть минимум SND элемента [с] из кортежи».

Answer 2

Я думаю, может быть, ваша проблема в том, что вы назвали свою функцию min, но вы также хотите использовать стандартную функцию OCaml min. Это возможно?

OCaml не имеет перегрузки (в качестве компенсации он имеет параметрический полиморфизм). Поэтому вам нужно использовать разные имена для вещей.