filter-overlaps ( alist -- alist' )

Vocabulary

geo-ip

Inputs

alist

an object

Outputs

alist'

an object

Definition

USING: assocs grouping kernel math sequences ;

IN: geo-ip

: filter-overlaps ( alist -- alist' )
    2 clump
    [ first2 [ first second ] [ first first ] bi* < ] filter
    keys ;