google DFS, BFS
like really
type Tree<'a> = Node of 'a * Tree<'a> list let rec countChildren (Node (_, children)) = children |> List.sumBy countChildren |> (+) 1 Node( 1, [ Node(2, [ Node(3, []) ]) Node( 4, [ Node( 5, [ Node(6, []) Node(7, []) Node(8, [ Node(9, []) ]) ] ) ] ) ] ) |> countChildren // 9
(Node (_, children)) в агрументе это вроде декомпозиция тупли ?
это паттерн матчинг
Обсуждают сегодня