z-value ( seq Z l r k -- seq Z l r )

Vocabulary

z-algorithm.private

Inputs

seq	an object
Z	an object
l	an object
r	an object
k	an object

Outputs

seq	an object
Z	an object
l	an object
r	an object

Definition

USING: kernel math ;

IN: z-algorithm.private

: z-value ( seq Z l r k -- seq Z l r )
    2dup < [ out-of-zbox ] [ inside-zbox ] if ; inline