module Koofr.Internal where import Data.Char lowerCamel :: String -> String lowerCamel [] = [] lowerCamel (x:xs) = toLower x : xs