sortChildrenBy :: Ord a => (Element -> <e> a) -> Element -> <Proc,e> ()
sortChildrenBy f el = sortChildrenWith (\x y -> compare (f x) (f y)) el
\ No newline at end of file
sortChildrenBy :: Ord a => (Element -> <e> a) -> Element -> <Proc,e> ()
sortChildrenBy f el = sortChildrenWith (\x y -> compare (f x) (f y)) el
\ No newline at end of file