check-combination-effect ( combination effect -- )

Vocabulary

generic

Inputs

combination	an object
effect	an object

Outputs

None

Definition

IN: generic

GENERIC#: check-combination-effect 1 ( combination effect -- )

Methods

USING: generic kernel ;

M: object check-combination-effect 2drop ;


USING: accessors generic generic.single generic.standard kernel
math sequences ;

M: standard-combination check-combination-effect
    [ dispatch# ] [ in>> length ] bi* over >
    [ drop ] [ bad-dispatch-position ] if ;