endpoint>= ( p1 p2 -- ? )

Vocabulary

math.intervals

Inputs

p1	an object
p2	an object

Outputs

?

an object

Definition

USING: combinators.short-circuit ;

IN: math.intervals

: endpoint>= ( p1 p2 -- ? )
    { [ endpoint> ] [ endpoint= ] } 2|| ;