(defun my-power (x) "" (* x x) )
(defun my-function (x) "" (my-power x))
(my-function 2)
; 4

(defun my-power (x) "" (* (* x x) x) )
(my-function 2)
; 8