popup-loc ( visible-rect popup-dim screen-dim -- loc )

Vocabulary

math.rectangles.positioning.private

Inputs

visible-rect	an object
popup-dim	an object
screen-dim	an object

Outputs

loc

an object

Definition

USING: arrays kernel ;

IN: math.rectangles.positioning.private

: popup-loc ( visible-rect popup-dim screen-dim -- loc )
    [ popup-x ] [ popup-y ] 3bi 2array ;