RosettaCodeData/Task/Bell-numbers/F-Sharp/bell-numbers-1.fs
2023-07-01 13:44:08 -04:00

2 lines
128 B
FSharp

// Generate bell triangle. Nigel Galloway: July 6th., 2019
let bell=Seq.unfold(fun g->Some(g,List.scan(+) (List.last g) g))[1I]