>range< ( range -- start stop step )


Vocabulary
ranges.private

Inputs
rangean object


Outputs
startan object
stopan object
stepan object


Definition
USING: accessors kernel math ;

IN: ranges.private

: >range< ( range -- start stop step )
[ from>> ] [ length>> ] [ step>> ] tri
[ swap 1 - * over + ] keep ;