Rebol Programming/inside?

USAGE:

edit
INSIDE? p1 p2 

DESCRIPTION:

edit

TRUE if both X and Y of the second pair are less than the first.

INSIDE? is a function value.

ARGUMENTS:

edit
  • p1 -- (Type: pair)
  • p2 -- (Type: pair)

SOURCE CODE

edit
inside?: func [
    {TRUE if both X and Y of the second pair are less than the first.} 
    p1 [pair!] 
    p2 [pair!]
][
    found? all [p2/x < p1/x p2/y < p1/y]
]