replaceOne :: Regex
           -> Rope
           -> Rope
           -> Rope
replaceOne = replaceCount 1
replaceOne :: Regex
           -> Rope
           -> Rope
           -> Rope
replaceOne = replaceCount 1
replaceOne = replaceCount 1