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|| ;