Functional or not?

Let's say I wrote a function like this:


(defun count-up-to (n)
  (let ((num 0))
    (labels ((count-up ()
               (when (> n num)
                 (format t "~A / ~A~%" (1+ num) n)
                 (incf num)
                 (count-up))))
      (count-up))))

Would this function be considered functional or not?

>>1
If your function doesnt change global variables, you should be okey. Anyway, IRL all functions are "functional", they just replace whole global state with new state. So this "functional" term is just mathematical nonsense. But usually you want to decompose and localize changes, whenever possible.