n-units ( n unit -- str/f )

Vocabulary

math.text.french.private

Inputs

n	an object
unit	an object

Outputs

str/f

an object

Definition

USING: combinators kernel math ;

IN: math.text.french.private

: n-units ( n unit -- str/f )
    {
        { [ over zero? ] [ 2drop f ] }
        { [ over 1 = ] [ [ basic ] dip space-append ] }
        [ [ basic ] dip space-append pluralize ]
    } cond ;