parse-altimeter ( str -- str' )

Vocabulary

metar.private

Inputs

str

an object

Outputs

str'

an object

Definition

USING: formatting kernel math math.parser sequences ;

IN: metar.private

: parse-altimeter ( str -- str' )
    unclip [ string>number ] [ 65 = ] bi*
    [ 100 /f "%.2f Hg" sprintf ] [ "%s hPa" sprintf ] if ;