#| This exercise has no tests.
Any solution is a right answer. |#
(define (alice-expmod base exp m)
  (remainder (fast-expt base exp) m))