space and time complexity of lisp functions : Good morning guys there are two lisp's functions 

    (defun fact (x &optional (acc 1)
    (if (zerop x) acc
    (fatt (- 1 x) (* x acc))))
    
    (defun fatt (x)
    (if (zerop x) 1
    (* x (fatt (- x 1))))

How can i find space and time complexity of this functions?

Thanks