AT
Size: a a a
AT
0
DS
DS
0
AK
AK
0
AK
List.map
AK
List.foldr
/List.foldl
, если надо его свернуть в структуруR:
G
RT
0
G
type Tree
= Tree
{ name : String
, nodes : List Tree
}
view : Tree -> Html msg
view (Tree tree) =
ul []
[ li [] [ text tree.name ]
, li [] [ List.map view tree.nodes ]
]
G
G
type Tree
= Tree
{ name : String
, nodes : List Tree
}
view : Tree -> Html msg
view (Tree tree) =
ul []
[ li [] [ text tree.name ]
, li [] [ List.map view tree.nodes ]
]
G
type alias Tree =
{ name : String
, nodes : List Tree
}
0