slider-scale ( slider -- n )

Vocabulary

ui.gadgets.sliders.private

Inputs

slider

an object

Outputs

n

an object

Definition

USING: kernel math math.order ui.gadgets.sliders ;

IN: ui.gadgets.sliders.private

: slider-scale ( slider -- n )
    [ [ elevator-length ] [ thumb-dim ] bi - 1 max ]
    [ slider-length* 1 max ] bi / ;