border-major-dim ( border -- dim )

Vocabulary

ui.gadgets.borders.private

Inputs

border

an object

Outputs

dim

an object

Definition

USING: accessors kernel math.vectors ;

IN: ui.gadgets.borders.private

: border-major-dim ( border -- dim )
    [ dim>> ] [ size>> 2 v*n ] bi v- ;