Advertisement
Guest User

Untitled

a guest
Sep 19th, 2018
72
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.09 KB | None | 0 0
  1. pow(_,0,1).
  2. pow(B,E,P):-
  3. E>0,
  4. E1 is E-1,
  5. pow(B,E1,P1),
  6. P is B*P1,!.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement