;(mod (point pow) ; (defun point_power (input pow) ; (if (= pow 1) input (point_add input (point_power input (- pow 1)))) ; ) ; (point_power point pow) ;) (a (q 2 2 (c 2 (c 5 (c 11 (q))))) (c (q 2 (i (= 11 (q . 1)) (q . 5) (q 29 5 (a 2 (c 2 (c 5 (c (- 11 (q . 1)) (q))))))) 1) 1))