nnew-sequence ( n -- quot )

Vocabulary

sequences.generalizations

Inputs

n

an object

Outputs

quot

an object

Definition

USING: generalizations kernel math sequences ;

IN: sequences.generalizations

MACRO: nnew-sequence ( n -- quot )
    [ [ drop ] ] [
        dup [
            [ [ [ new-sequence ] ] ] dip [ apply-curry ] curry
            compose
        ] dip [ cleave* ] curry compose
    ] if-zero ;