added 1-! and 1+! and Forth pseudocode for NUMBER