F #: Взаимно рекурсивные функции

Question

Можно создать дубликат:
[F#] How to have two methods calling each other?

Привет всем,

У меня есть сценарий, где у меня есть две функции, которые выиграют от взаимно рекурсивная, но Я не уверен, как это сделать в F #

Мой сценарий - n Ot так просто, как следующий код, но я хотел бы получить что-то похожее на компилировать:

let rec f x = 
    if x>0 then 
    g (x-1) 
    else 
    x 

let rec g x = 
    if x>0 then 
    f (x-1) 
    else 
    x 

Answer 1

Вы можете также использовать letrec ... and форма:

let rec f x = 
    if x>0 then 
    g (x-1) 
    else 
    x 

and g x = 
    if x>0 then 
    f (x-1) 
    else 
    x 

Answer 2

Чтобы получить взаимно рекурсивные функции просто переходят друг к другу в качестве параметра

let rec f g x = 
    if x>0 then 
    g (x-1) 
    else 
    x 

let rec g x = 
    if x>0 then 
    f g (x-1) 
    else 
    x 

Answer 3

используйте let rec ... and ... конструкцию:

let rec f x = 
    if x>0 then 
    g (x-1) 
    else 
    x 

and g x = 
    if x>0 then 
    f (x-1) 
    else 
    x