< 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.