递归函数lambda化

(setq chenbing
    (lambda (name n)
        (if (>  n    0)
              (+  n   (funcall  name name (- n 1)))
            1
        )
    )
)

(funcall   chenbing  chenbing 10)