SUBAR  START
       LAD GR0,1
       LAD GR1,1
       LAD GR2,2
       LAD GR3,3
       LAD GR4,10
       LAD GR5,5
       LAD GR6,6
       LAD GR7,2
       SUBA GR0,GR1
       SUBA GR2,GR3
       SUBA GR4,GR5
       SUBA GR6,GR7
       SUBA GR0,AD1,GR1
       SUBA GR2,AD1,GR3
       SUBA GR4,AD1,GR5
       SUBA GR6,AD1,GR7
       RET
AD1    DC 3
       DC 4
       DC 5
       DC 6
       DC 7
       DC 8
       END