      INTEGER FUNCTION IALLOC(NITEMS,ISIZE)
C
      CALL I0TK01
      IALLOC = ISTKGT(NITEMS,ISIZE+2)
C
      RETURN
C
      END
