Eu estou estudando para um teste de Natal e fazendo algumas perguntas do exame, eu me deparei com este que me deixou perplexo

Eu consigo fazer uma recursão regular, mas não consigo entender como escrever a mesma coisa usando a recursão da cauda.

Versão regular:

    (define (factorial X)
      (cond
            ((eqv? X 1) 1)
            ((number? X)(* X (factorial (- X 1))))))