>positive-mod ( x n -- y )

Vocabulary

math.functions.private

Inputs

x	an object
n	an object

Outputs

y

an object

Definition

USING: kernel math ;

IN: math.functions.private

: >positive-mod ( x n -- y ) over 0 < [ + ] [ drop ] if ;
    foldable flushable