parse-sea-level-pressure ( str -- str' )

Vocabulary

metar.private

Inputs

str

an object

Outputs

str'

an object

Definition

USING: formatting kernel math math.parser splitting ;

IN: metar.private

: parse-sea-level-pressure ( str -- str' )
    "SLP" ?head drop string>number dup 500 < 10000 9000 ? +
    10.0 /f "sea-level pressure is %s hPa" sprintf ;