remove-one ( seq obj -- seq )

Vocabulary

units

Inputs

seq	an object
obj	an object

Outputs

seq

an object

Definition

USING: arrays sequences splitting ;

IN: units

: remove-one ( seq obj -- seq ) 1array split1 append ;