num-alt. ( n -- str )

Vocabulary

koszul

Inputs

n

an object

Outputs

str

an object

Definition

USING: combinators math.parser sequences ;

IN: koszul

: num-alt. ( n -- str )
    {
        { 1 [ " + " ] }
        { -1 [ " - " ] }
        [ number>string " + " prepend ]
    } case ;