@+ @++ @+
@+
* @+ ( addr -- addr' x )

Fetch the value _x_ from _addr_, and increment the address
by one cell. 
 : @+  ( addr -- addr' x )  DUP CELL+ SWAP  @ ;

FORTH/BASE forth_usual forthword synonym