parse-seas ( str -- str' )

Vocabulary

metar.private

Inputs

str

an object

Outputs

str'

an object

Definition

USING: formatting math.parser sequences splitting ;

IN: metar.private

: parse-seas ( str -- str' )
    "-" split [ string>number number>string ] map " to " join
    "seas %s feet" sprintf ;