builderFromList :: Builder -> (a -> Builder) -> [a] -> Builder
builderFromList _ _ [] = mempty
builderFromList :: Builder -> (a -> Builder) -> [a] -> Builder
builderFromList _ _ [] = mempty
builderFromList _ _ [] = mempty