1- 1+ 2
1- ( val -- val-1 )  
ansi .6.1.0300 <CORE>
return the value decremented by one
 simulate:
   : 1- 1 - ;

reference: p4_one_minus in ../src/core.c:0388, export CO 1-