general-format ( neg? f e -- str )

Vocabulary

math.parser.private

Inputs

neg?	an object
f	an object
e	an object

Outputs

str

an object

Definition

USING: kernel math math.order ;

IN: math.parser.private

: general-format ( neg? f e -- str )
    [
        2dup [ + ] [ neg ] bi [ 0 max ] bi@ + 17 >
        [ exponential-format ] [ decimal-format ] if
    ] (format) ; inline