split-reverse ( list -- back-reversed front )

Vocabulary

persistent.deques.private

Inputs

list

an object

Outputs

back-reversed	an object
front	an object

Definition

USING: kernel lists math ;

IN: persistent.deques.private

: split-reverse ( list -- back-reversed front )
    dup llength 2/ lcut lreverse swap ;