  100 REM PURPOSE: VERIFY 'RESIDUE' FUNCTION
  110 REM  AUTHOR: HOWARD WULF, AF5NE
  120 REM    DATE: 2017-04-10
  130 REM    NOTE: OPTION VERSION "RBASIC"
  140 REM
  150 PRINT "A%", "B%", "A% / B%", "RESIDUE"
  160 LET A% = 17
  170 LET B% = 5
  180 LET C% = A% / B%
  190 PRINT A%, B%, C%, RESIDUE
  200 LET A% = -17
  210 LET B% = 5
  220 LET C% = A% / B%
  230 PRINT A%, B%, C%, RESIDUE
  240 REM
  999 END

