Przedstawię najbardziej naiwny sposób (można to zrobić dużo lepiej, to chyba najgorszy możliwy sposób potęgowania).
Def
x ^ n (x do potęgi ntej) = x * x * ...(n razy) * x
Tutaj sama narzuca się pętla for ograniczona z góry przez n, w której przemnażasz liczbę przez bazową jej wartość