< Rebol Programming
USAGE:
OVERLAP? f1 f2
DESCRIPTION:
Returns TRUE if faces overlap each other.
OVERLAP? is a function value.
ARGUMENTS:
- f1 -- (Type: any)
- f2 -- (Type: any)
SOURCE CODE
overlap?: func [
"Returns TRUE if faces overlap each other."
f1 f2
][
found? all [
f1/offset/x < (f2/offset/x + f2/size/x)
f1/offset/y < (f2/offset/y + f2/size/y)
(f1/offset/x + f1/size/x) > f2/offset/x
(f1/offset/y + f1/size/y) > f2/offset/y
]
]
This article is issued from Wikibooks. The text is licensed under Creative Commons - Attribution - Sharealike. Additional terms may apply for the media files.