David A. Moon, Wayland High School, Wayland,
The purpose of XPON is to calculate integer powers of
positive integers with more than the usual seven digits of pre-
cision in FOCAL. As the result is computed, it is divided into
groups of five digits. Each group occupies a FOCAL variable.
The method of exponentiation is repeated multiplication.
The base and the exponent must
both be integers