Getting rid of the “pyramid of doom” in F#
问题 I have several verbal expressions that I've packaged into one function: open FsVerbalExpressions open FsVerbalExpressions.VerbalExpression open System.Text.RegularExpressions open System let createOrVerbExFromList (verbExList: VerbEx list) = let orVerbEx = verbExList |> List.reduce (fun acc thing -> verbExOrVerbEx RegexOptions.IgnoreCase acc thing) //simpleVerbEx orVerbEx let k12VerbEx = let kTo12 = ["SCHOOL"; "DIST"; "SD"; "HS"; "BD OF ED"] kTo12 |> List.map (fun word -> VerbEx(word)) |>