cpBBcontainsVect ( bb: cpBB v: cpVect -- ? )

Vocabulary

chipmunk.ffi

Inputs

bb	a cpBB
v	a cpVect

Outputs

?

an object

Definition

USING: accessors combinators.short-circuit kernel math typed ;

IN: chipmunk.ffi

TYPED: cpBBcontainsVect ( bb: cpBB v: cpVect -- ? )
    {
        [ [ l>> ] [ x>> ] bi* < ]
        [ [ r>> ] [ x>> ] bi* > ]
        [ [ b>> ] [ y>> ] bi* < ]
        [ [ t>> ] [ y>> ] bi* > ]
    } 2&& ; inline