INTEGER FUNCTION TOCHAR(CH)
      INTEGER CH
      TOCHAR=CH+32
      RETURN
      END