boundary-shift ( loc dim -- loc' dim' )

Vocabulary

ui.pens.rounded

Inputs

loc	an object
dim	an object

Outputs

loc'	an object
dim'	an object

Definition

USING: kernel math.vectors ;

IN: ui.pens.rounded

: boundary-shift ( loc dim -- loc' dim' )
    [ 0.3 v+n ] [ 0.6 v-n ] bi* ;