V300: Preset Parts of an Array

Author(s): J. Zoll	Library: KERNLIB
Submitter: C. Letertre	Submitted: 01.03.1968
Language: Fortran or Assembler	Revised: 16.09.1991

These routines fill each word of an array with zero, 'blank', or a quantity given in the argument list.

Structure:

SUBROUTINE subprograms
User Entry Names: UBLANK, UZERO, UFILL

Usage:

Required .

    CALL UZERO(A,J1,J2)

sets A(J1) until A(J2) to zero.

    CALL UBLANK(A,J1,J2)

sets A(J1) until A(J2) to BCD blank.

    CALL UFILL(A,J1,J2,STUFF)

loads A(J1) until A(J2) with the contents of STUFF.