(z-values) ( seq -- Z )

Vocabulary

z-algorithm.private

Inputs

seq

an object

Outputs

Z

an object

Definition

USING: arrays kernel ranges sequences ;

IN: z-algorithm.private

:: (z-values) ( seq -- Z )
    seq length dup 0 <array> :> ( len Z ) len 0 Z set-nth
    seq Z 0 0 len [1..b) [ z-value ] each 4drop Z ; inline