Clojure編寫一個階乘程式 使用遞迴

這是遞迴

(def f
 
  (fn fb
    [x]
    (if (< x 2)
      1
      (* x (fb (- x 1)) )
     )
    
    )
 
)

 

(def f
 
  (fn fb
    [x y]
    (if (= x 1)
      y
      
       (fb (- x 1) (* x y))
     )
    
    )
 
)