Forth assignment