potencia b e = if e < 0 then 1 / (potencia b (-e))