%N gritoc %F $MIR/src/gritoc.f
%D Convert integer to character string
%B
      INTEGER FUNCTION GRITOC(INT, STR)
      INTEGER INT
      CHARACTER*(*) STR

 Convert integer INT into (decimal) character string in STR.
