Texto de mayúscula a minúscula

Hola muchachos.
Alguien sabe como cambiar un texto de mayúscula y pasarlo a la primera letra en mayúscula y las demás en minúsculas.
Por ejemplo.
Tengo la siguiente lista
("ARC" "LINE" "CIRCLE")
Y quiero que me quedé de la siguiente manera.
("Arc" "Line" "Circle")
Mil gracias y espero puedan ayudarme.
Saludos.

En se ejemplo:
(setq txt "ROBER")
(setq txt1 (strcat(strcase (substr txt 1 1)) (strcase (substr txt 2) T)))

Devuelve "Rober"

Hola hermano.
Gracias por el dato. Ya me sabía la función de strcase, pero no la recordaba, fue unas de las primeras que aprendí y nunca la volví a utilizar. Jejeje.
Mil gracias y un saludo.