(TYPE)
* (TYPE) ( val -- )

like TYPE and always to screen
- the routine to be put into *TYPE*

misc ordinary primitive