Czy ... inaczej .. idiomatyczny sposób pisania rzeczy w F #?

Question

Jaki byłby F # idiomatyczny sposób pisania poniższych? Czy możesz zostawić to tak, jak jest?

let input = 5 
let result = 
    if input > 0 && input < 5 then 
     let a = CalculateA(input) 
     let b = CalculateB(input) 
     (a+b)/2 
    else 
     CalculateC(input) 

Answer 1

Na jednym if ... then ... else ... pewnie bym zostawić to tak, że jeśli miał więcej przypadków bym użyć wzoru mecz z kiedy strażnik:

let result = 
    match input with 
    | _ when input > 0 && input < 5 -> ... 
    | _ -> ... 

lub może także chcą wyglądać przy aktywnych wzorcach: http://msdn.microsoft.com/en-us/library/dd233248.aspx

Answer 2

To nie jest odpowiedź, ponieważ Robert ma rację. Ale wygląda na to, że pracujesz z szeregu funkcji, więc można napisać tak:

let Calculate input = 
    let calc = function | [f] -> f input | fl -> fl |> List.map ((|>) input) |> List.sum |> (fun s -> s/fl.Length) 
    if input > 0 && input < 5 
     then calc [CalculateA; CalculateB] 
     else calc [CalculateC] 

Można rozkładać na coś z tym podpisem: ((int -> int) list) -> ((int -> int) list) -> (int -> bool) -> int -> int a następnie budować swoją funkcję przez przyłożenie pierwsze 3 parametry.

Answer 3

To drobne stylistyczne zmiany, ale uważam to bardziej czytelne:

let input = 5 
let result = 
    if input > 0 && input < 5 then 
     (calculateA input + calculateB input)/2 
    else 
     calculateC input 

Answer 4

Co byłoby F # idiomatyczne sposób pisania następujące? Czy możesz zostawić to tak, jak jest?

Nie ma nic złego w sposób, w jaki zostały napisane to, ale tu jest inna alternatywa (zainspirowany Huusom):

let input = 5 
let result = 
    if input>0 && input<5 then [A; B] else [C] 
    |> Seq.averageBy (fun f -> f input)