1 // logic.asm: WORD p_within, 'WITHIN',fasm
8 Data stack: ( v lo hi -- 0/-1
11 "WITHIN" is a function word that replaces a triple of values with -1
12 of the the first, v, is within the value range spanned by the second,
13 lo, inclusive and third, hi, exclusive.
16 .Definition concept for WITHIN
18 : WITHIN 2 PICK > ROT ROT <= AND ;