replaceChildren :: Traversable a b -> a -> [b] -> a ... (b -> b) -> a -> a mapChildren tr f x = replaceChildren tr x (map f (children tr x)) ...
確定! 回上一頁