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))
     )
    
    )
 
)