[willvk]

That's some very concise code golf! It would be interesting in seeing how Forth compiles this under the hood.

[pjc50]

Normally Forth is interpreted. Compiled Forth code is unlikely to look particularly clean or elegant.

(If you like languages with a very high density of functionality to symbol count, you should look at APL and its successor J)