clip-data ( bounds data -- data' )

Vocabulary

ui.gadgets.charts.lines

Inputs

bounds	{ { xmin xmax } { ymin ymax } }
data	sequence of { x y } pairs sorted by non-descending x

Outputs

data'

possibly empty subsequence of data

Word description

Filter the data by first removing all points outside the [xmin,xmax] range, and then making sure that the remaining y values are not entirely above or below the [ymin,ymax] range.

Definition

USING: kernel sequences ui.gadgets.charts.lines.private ;

IN: ui.gadgets.charts.lines

: clip-data ( bounds data -- data' )
    dup empty?
    [ nip ] [
        dupd [ first ] dip clip-by-x dup empty?
        [ nip ] [
            [ second ] dip [ y-in-bounds? ] 1check
            [ drop { } ] unless
        ] if
    ] if ;