CSET CS-STACK CSP
CSET ( n addr -- )  
<FORTH-83-L&P>
set bits in byte at given address 
 simulate:
   : CSET  TUCK @ SWAP OR SWAP ! ;

reference: p4_c_set in ../src/lpf83.c:0121, export CO CSET