let toTuple (origin: 'a []) =
function
| [a; b] -> (a, b)
| _ -> ()
функция, которая преобразует массив в кортеж. по задумке, если массив из двух элементов, то возвращается кортеж из двух элементов. иначе - возвращает пустой кортеж. просто не хочется связываться с нульэйблами