V
Size: a a a
AH
AH
let getRate' dst =
tryGetDirect dst
|> Option.orElseWith (fun _ -> tryGetWithJoin dst)
AH
AH
AH
module Rate =это можно сделать методами рекорда
let right rate = rate.Right
let left rate = rate.Left
AH
AH
|> Seq.map getRate
|> Seq.map Option.get
|> Seq.choose getRateAH
rates |> List.append (rates |> List.map flipRate)