K J K-DOWN
K ( -- counter-val )  
<FORTH-83>
the 3rd loop index just like I and J

reference: p4_k in ../src/forth-83.c:0240, export CO K