Como usar o operador de decremento 1- da linguagem LISP

; programa LISP que demonstra o uso do operador
; de decremento
(let((valor))
  ; inicialmente vamos definir o valor
  ; como 10
  (setq valor 10)
  (format t "O valor atual é: ~D~%" valor)
  
  ; agora vamos decrementar o valor em 1
  (setq valor (1- valor))
  (format t "O novo valor é: ~D~%" valor)
  
  ; vamos decrementar o valor em 1 novamente
  (setq valor (1- valor))
  (format t "O novo valor é: ~D" valor)
)