?1+ ( x -- y )


Vocabulary
math

Inputs and outputs
xa number or f
ya number


Word description
If the input is not f, adds one. Otherwise, outputs a 0.

Definition
USING: kernel ;

IN: math

: ?1+ ( x -- y ) [ 1 + ] [ 0 ] if* ; inline