module Text.XML.WraXML.Utility where

compose :: [a -> a] -> a -> a
compose :: forall a. [a -> a] -> a -> a
compose = forall a b c. (a -> b -> c) -> b -> a -> c
flip (forall (t :: * -> *) a b.
Foldable t =>
(a -> b -> b) -> b -> t a -> b
foldr forall a b. (a -> b) -> a -> b
($))