validate-request ( src-order dst-order -- src-order dst-order )

Vocabulary

images.normalization.private

Inputs

src-order	an object
dst-order	an object

Outputs

src-order	an object
dst-order	an object

Definition

USING: images kernel sequences ;

IN: images.normalization.private

: validate-request
    ( src-order dst-order -- src-order dst-order )
    [
        [ { DEPTH DEPTH-STENCIL INTENSITY } member? ] bi@ or
        [ "Invalid component-order" throw ] when
    ] 2keep ;