let x = if x then a else b in x

let x = if StringSet.mem "*" sections then a else b in x

let x =

if StringSet.mem "*" sections then fun _ -> true else

  fun x -> StringSet.mem x sections

in x