#
# MOD value test
#
FORWARD success;
FORWARD failure;
: MAIN 7 13 MOD 6 = IF success ELSE failure ENDIF ;