double-value ( str -- m n )

Vocabulary

metar.private

Inputs

str

an object

Outputs

m	an object
n	an object

Definition

USING: kernel sequences ;

IN: metar.private

: double-value ( str -- m n )
    1 cut 3 cut [ signed-number ] dip 1 cut signed-number ;