signed-number ( sign value -- n )

Vocabulary

metar.private

Inputs

sign	an object
value	an object

Outputs

n

an object

Definition

USING: kernel math math.parser ;

IN: metar.private

: signed-number ( sign value -- n )
    [ string>number ] bi@ swap zero? [ neg ] unless 10.0 / ;