Skip to content

Instantly share code, notes, and snippets.

@dsyme
Created June 29, 2022 17:24
Show Gist options
  • Save dsyme/9523e4738707311dd5bc4b3933689f32 to your computer and use it in GitHub Desktop.
Save dsyme/9523e4738707311dd5bc4b3933689f32 to your computer and use it in GitHub Desktop.
open System
let transfers = [| Some 2,1 |]
let FetchInternalTransfers (includeConfirmeds: int) =
task {
let! mapPrioritiesTransfers =
task {
if includeConfirmeds > 1 then
transfers
|> Array.map(fun (loanid,c) -> loanid.Value, 4)
|> Array.map(fun (k,vs) -> k, 1)
|> Array.map(fun (id,c) -> c,true)
|> ignore
}
return [| 1 |], 1
}
let main() =
let test = FetchInternalTransfers 2
test.Result |> printfn "%A"
main()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment