infix-nth ( n seq -- elt )

Vocabulary

infix.private

Inputs

n	an object
seq	an object

Outputs

elt

an object

Definition

USING: kernel math sequences ;

IN: infix.private

:: infix-nth ( n seq -- elt )
    n dup 0 < [ seq length + ] when seq nth ;