SUBAR  START
       LAD GR0,-32000
       LAD GR1,3000
       SUBA GR0,GR1
       RET
       END