LeetCode 78. Subsets in F#
URL
https://leetcode.com/problems/subsets/description/?envType=daily-question&envId=2024-05-21
Code
https://github.com/syohex/dotnet-study/blob/master/fsharp/leetcode/challenge/202405/subsets/main.fsx
let subsets (nums: int list) : int list list =
let rec subsets' nums acc =
match nums with
| [] -> acc |> List.rev
| h :: t ->
let acc' = acc |> List.fold (fun acc' v -> (v @ [ h ]) :: acc') acc
subsets' t acc'
subsets' nums [ [] ]