* 0> ( value -- cond ) return value greater than zero simulate: : 0> 0 > ;
0>
( value -- cond )
simulate: : 0> 0 > ;
core ordinary primitive