seq-append-as ( seq1 seq2 exemplar -- newseq )


Vocabulary
sequences.seq

Inputs
seq1an object
seq2an object
exemplaran object


Outputs
newseqan object


Definition
USING: kernel math sequences sequences.seq.private ;

IN: sequences.seq

: seq-append-as ( seq1 seq2 exemplar -- newseq )
[ 2dup 2length + ] dip [ -rot (seq-append) ] new-like ;
inline