Como concatenar strings em LISP usando a função concatenate()

; variáveis que vamos usar no programa
(let ((palavra1)(palavra2)(resultado))
  ; Vamos pedir para o usuário informar as
  ; duas palavras
  (princ "Informe a primeira palavra: ")
  ; talvez o seu compilador não precise disso
  (force-output)
  ; atribui o valor lido à variável palavra1
  (setq palavra1 (read-line))
  (princ "Informe a segunda palavra: ")
  ; talvez o seu compilador não precise disso
  (force-output)
  ; atribui o valor lido à variável palavra2
  (setq palavra2 (read-line))
  
  ; agora vamos concatenar as duas palavras lidas
  (setq resultado (concatenate 'string 
    palavra1 palavra2))
  
  ; e mostramos a string invertida
  (format t "A string resultante é: ~S" resultado)
)