%N mpfmt %F $MIR/src/subs/mp.for
%D Format a multi-precision integer as a string.
%P rjs
%B
        subroutine mpFmt(out,v)

        implicit none
        integer v(3)
        character out*(*)

  Format a multi-precision integer as a string.

  Input:
    v          The multi-precision integer being formatted.
  Output:
    out        The string containing a representation (base 10) of the 
               multi-precision integer.
