PROG    START   BEGIN
BEGIN	LAD GR1,DATA_A
        LD  GR3,SIZE_A
        CALL    MINIM
        ST  GR0,MINA
        LAD  GR1,B
        LD  GR3,C5
        CALL    MINIM
        ST  GR0,MINB
        RET
DATA_A   DC  17,21,15,28,6
SIZE_A   DC  5
DATA_B   DC  4,8,21,13,12
SIZE_B   DC  5
MINA    DS  1
MINB    DS  1
	END